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INFORMATIQUE 

COMMUNICATION 
DIALOGUE 36 15 MHZ 



De nouvelles rubriques arrivent 



TOUTES NOS REVUES 



Savoir comment nous joindre, les sommaires, 
les infos... 



QUESTIONS-REPONSES 



Une nouvelle façon de poser les questions et de 
voir les réponses faites ! 



500 PETITES ANNONCES 



C'est en moyenne ce que vous trouvez sur le ser- 
veur. De quoi faire votre choix ! 



BOITE AUX LETTRES 



Une manière de correspondre entre vous ou de 
nous laisser des messages. Nos BAL : SORACOM - 
ARCADES - AMSTAR - PCOMPATIBLE - MEGAHERTZ 
CPC REDACT - ASTROLOGIE P. 



DIALOGUE 



Christophe en direct tous les jours avec vous I 



REVENDEURS 



Certains revendeurs français disposent d'un accès 
gratuit pour leurs promotions. 



NOS PRODUITS 



La rubrique sur nos productions avec la possibilité de 
commander 



BRETAGNE EDIT'PRESS 



Désormais vous trouverez sur le serveur les nouveautés 
diffusées par cette société. 



HOROSCOPE 



L'horoscope 1988 mais aussi depuis peu le mensuel du 
15 au 15 du mois. 



Au téléphone, 15 minutes coûtent en moyenne 55 francs. 
Par minitel, il vous en coûte pour le même temps 15 francs. 

LE BON CHOIX 36 15 MHZ 
NOUVELLE VERSION 
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Cet article est destiné à nos 
lecteurs qui possèdent un 
CPC 464 (avec drive DDI) et 
qui se demandent ce qu'ils 
auraient de plus avec un 
6128 ; mais aussi à ceux qui 
ont un 6128 et qui aimeraient 
bien connaître les spécificités 
de leur appareil. Ce sera donc 
une analyse comparative sans 
aucun parti pris. 

Le premier contact *»*n* 

e bloc clavier est très différent : 
les touches sont toutes d'un gris 
uniforme et les "pavés" flèche et 
numérique ne sont plus séparés ; d'où un 
aspect tristounet et un peu confus. En 
revanche, la longueur est plus courte de 
cinq centimètres car un drive est plus 
étroit qu'un lecteur de cossettes. De 
même la hauteur est diminuée de 1,5 cm 
donc moins de fatigue dans les poignets. 
Le moniteur semble identique, en fait il 
renferme en plus l'alimentation 12 volts 
du drive ; donc celui-ci ne tiédira plus... 
Le manuel est deux fois plus épais et très 
solidement relié mais le contenu est hélas 
toujours aussi désordre. On trouve aussi 
une disquette supplémentaire pour le 
"CP/M PLUS". 

En bref, c'est très nettement moins 
encombrant sur la table, surtout si vous 
avez le drive DDI avec ses câbles, et plus 
rapidement installé. 
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Côtés connecteurs : on trouve en outre 
un socle DIN pour la liaison avec un 
magnétophone extérieur. 
Revenons au clavier. Plusieurs touches 
ont malheureusement changé de place : 
COPY, CTRL, le SHIFT de gauche, le 
"petit ENTER" et les flèches. Et comme 
tout est gris et jointif, les fautes de frappe 
vont bon train I Si vous "venez" du 
QWERTY ne cherchez plus les signes 
" " et "I" qui sont devenus "à" et 
"ù" ; rassurez-vous ce sont les mêmes 
codes ASCII donc ils auront les mêmes 
effets. Aucune touche nouvelle. 
Voyons à présent les différences "inter- 
nes", c'est-à-dire ces fameux 64 kilo 
octets en plus, le nouveau CP/M PLUS et 
surtout le BASIC complété. 

LA MEMOIRE EN PLUSMrfVi 

Ces 64 Ko "auxiliaires" risquent fort de 
vous décevoir : ils constituent en fait une 
sorte de disque RAM où l'on peut quel- 
quefois y caser certaines choses. C'est 
parfois pratique mais AMSTRAD aurait 
pu faire beaucoup mieux (comme par 
exemple pour les PCW). 
Ce bloc de RAM supplémentaire est 
appelé le "BANK" ; en jargon informa- 
tique un BANK est un bloc de 64 Ko de 
RAM. Rappelons que les CPC (et PCW) 
utilisent un microprocesseur type Z80 qui 
a le défaut de ne pouvoir "adresser" 
que sur un bank, celui d'origine. Donc 
pour pouvoir utiliser les données mémo- 
risées dans le bank n° 2, il faut d'abord 
qu'il les transfère dons le bank n° 1. 
C'est beaucoup plus rapide que s'il les 
prenait sur la disquette I 



Alors concrètement que nous apporte ce 
bank n° 2 ? 

1 - La possibilité d'y loger quatre 
"fichiers images" d'écrans de 16 Ko 
chacun. En une fraction de seconde, ils 
peuvent être chargés dans notre 
mémoire d'écran, c'est spectaculaire. 
Nous en reparlerons. 

2 - Certains utilitaires du commerce 
savent utiliser ce bank ; exemple "DIS- 
COLOGIE" qui en mode "copie" (je 
n'ai pas dis piratage I) charge 84 Ko 
d'un coup ! D'où des changements de 
disquettes "source/destination" beau- 
coup moins nombreux. 

3 - Pouvoir stocker des données sous 
forme de "pseudo fichiers en accès 
direct". Ils ne seront pas effacés de cette 
RAM par un NEW ou un RUN et pour- 
ront donc être exploités par divers pro- 
grammes successifs. Nous verrons plus 
foin que cette pratiaue est en fait lourde 
d'emploi et peu performante, c'est vrai- 
ment dommage I 

En supplément du classique CP/M 2.2 
cette disquette nous apporte un 
"système" plus puissant certes mais avec 
le grave inconvénient suivant : une dis- 
quette formatée en CP/M PLUS sera illi- 
sible sur un CPC 464 (qui n'accepte que 
le CP/M 2.2), même avec un simple CAT 
ou DIR. D'autre part, il n'y a pas l'équi- 
valent de FILECOPY (sauf grosses 
magouilles avec PIP) qui n'existe que sur 
le 2.2... Pas mal hein I 
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D'où cette conclusion qui n'engage que 
moi : sur 6128, utilisez le bon vieux 
CP/M 2.2 passe-partout, sauf si vous êtes 
un passionné de la bidouille sous CP/M, 
ce qui est assez rare... 
Pour les besoins courants (FORMAT, 
DIR, COPIES) le 2.2 est bien plus rapide 
d'emploi que le CP/M PLUS. Je préfère 
le 2.2 livré avec le 464 que celui livré 
avec le 6128. 

LE BANK MANAGER******* 

Pour utiliser le bank n° 2, il faut tout 
d'abord lancer BANKMAN.BAS qui 
chargera BANKMAN.BIN. Ces deux 
programmes sont sur la disquette CP/M 
PLUS. Puis vous pourrez lancer vos pro- 
grammes BASIC personnels. 
Ce programme BANKMAN.BIN con- 
tient des routines genre RSX et de ce fait 
les commandes concernant ce bank sont 
des "mots" commençant par le signe 
"I". On les connaîtra vite car il n'y en 
a que six... 

Suggestion : copiez ces deux program- 
mes sur votre disquette de programmes 
personnels. BANKMAN.BAS est enre- 

Eistré en "protégé" (eh ouil). 
éprotégez-le par un utilitaire du com- 
merce, remplacez le END de la ligne 
220 par un RETURN, ajoutez la ligne 5 
bankman, puis RENAME 65000 et sau- 
vegardez par SAVE"BANK". Joindre 
ce module par MERGE"BANK" à vos 
programmes qui commenceront bien sûr 
par GOSUB 65000. 

Les appels d'ecran wm» 

(Voir listing n° 1) 

Ce petit programme illustre les substitu- 
tions d'images d'écrans. Attention I II 
faut tout d'abord lancer BANKMAN car 
on va avoir besoin de ses RSX. 
Notre scénario est simple : on trace un 
beau cercle à l'écran et on "sauve- 
garde" par :SCREENCOPY cette image 
dans le bank 2. On effectue cette 
manœuvre 4 fois et ce avec des rayons 
différents. On a donc stocké quatre 
fichiers images de 1 6 Ko chacun dans le 
bonk 2 ; ils sont numérotés de 2 à 5. 
NOTA : le fichier image n° 1 est celui 
présent à l'écran. 

Seconde phase d'utilisation : on rappelle 
ces fichiers à l'écran à tour de rôle, tou- 
jours par :SCREENCOPY mais dans le 
sens bank vers écran. C'est tellement 
rapide que cela fait une sorte d'anima- 
tion. 

Les DATA de la ligne 40 sont les divers 
rayons. 

On dipose aussi de la commande 
:SCREENSWAP qui ressemble un peu à 
la prédédente, mais SWAP signifie 
échange entre l'écran (zone n° 1) et 
l'une des zones 2 à 5 du bank 2. Ainsi 
avec :SCREENSWAP, 1 ,3 ce qui était à 
l'écran passe en zone 3, et il apparaît 
ce qui se trouvait en zone 3. 
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Les fichiers en 
acces direct! 

C'est un bien grand mot car cela a très 
peu de rapport avec ce qui existe en ce 
domaine dans d'autres BASIC (ex. GW- 
BASIC des IBM PC). 
En deux mots, disons d'abord en quoi 
consiste le "vrai accès direct". 
Chaque "fiche" (il faut dire "enregistre- 
ment") a une longueur L fixée à 
l'avance, et elles sont mises bout à bout 
donc en un seul gros bloc. Si l'on veut 
lire la fiche n° 123, ce segment de L 
octets est directement mis en RAM et ce 
sans avoir à lire les 1 22 précédentes (ce 
que l'on doit faire avec les fichiers "sé- 
quentiels" par OPENIN). 
Même principe pour la sauvegarde : 
après modification du segment 123, 
celui-ci va reprendre sa place inititale en 
écrasant seulement son ancienne valeur, 
donc sans avoir à réécrire la totalité du 
fichier (comme avec OPENOUT). 

Contrairement aux fichiers chargés en 
DIM, on peut donc exploiter un fichier de 
taille gigantesque (généralement sur dis- 
quette) car en RAM il n'y a qu'une fiche 
à la fois de L octets... 
Voyons à présent ce que nous livre le 
CPC6128. 

Primo, le fichier n'est pas sur la disquette 
mais UNIQUEMENT dans le bank 2, 
donc déjà limité à 64 Ko. 
Secundo, pour le charger depuis la dis- 
quette ou pour le sauvegarder, il n'existe 
pas de commande spéciale. Il faut donc 
programmer des OPENIN et des OPE- 
NOUT car on ne dispose pour cela que 
du classique "séquentiel" I Et le gag ne 
s'arrête pas là... 

Tertio, il n'est pas possible de transférer 
dans le bank 2 plus de 35 Ko environ, 
et voici pourquoi. 

Pour charger des enregistrements A$ de 
longueur L la syntaxe est en gros la sui- 
vante : 



WHILE NOT EOF 
LINE INPUT #9, AS 
R% = 0: :BANKWRITE, 
WEND 



R%,A$ 



Supposons L= 100 octets et 350 enregis- 
trements. La chaîne AS va donc être 
redéfinie 350 fois à la longueur L ; on 
va donc consommer bêtement 
350x 1 00 = 35000 octets de RAM sur les 
42000 dont on dispose au départ. 
Autrement dit, la mémoire disponible, 
lisible par PRINT FRE(0) va chuter de 
35000 octets rien aue pour charger le 
fichier I Aller au-delà conduirait au 
"garbage" (le FRE("") automatique qui 
provoque 30 minutes de blocage). 
Et le gag ne s'arrête pas là... 
Ce fichier enfin chargé en bank 2, on n'a 
plus assez de mémoire pour l'exploiter, 
alors on lancera un deuxième pro- 
gramme, par exemple RUN 



"EXPLOITE. BAS". Et là, autre surprise : 
avant de charger une fiche de longueur 
A$, il faut d'abord initialiser cet AS par 
des blancs I 

A$ = SPACE$(L):R% = 
:BANKREAD, R%,A$,123 
(123= n° désiré) 

et là encore bonjour le garbage ! N'ex- 
ploitez pas trop... 

Ah I J'oubliais : il n'y a rien de prévu 
pour segmenter L en divers noms de 
variables (champs) ; c'est à vous de le 
faire à coups de MID$. Et le gag conti- 
nue. 

Il reste à sauvegarder votre travail, mais 
toujours en raison du risque de garbage 
il faudra lancer un RUN "SAUVE. BAS". 
Faisons le point. Il nous aura fallu lan- 
cer quatre programmes BASIC pour 
exploiter un fichier de 35 Ko : 1 BANK- 
MAN.BAS (qui a lancé BANKMAN. 
BIN), 2 CHARGERAS, 3 EXPLOITE. 
BAS, 4 SAUVE. BAS. D'accord on aime 
bien rire, mais trouvez-vous cela 
sérieux ? 

Le petit programme ACCEDIR (listing 
n° 2) illustre l'écriture de ce type de 
fichier AMSTRAD : création, lecture en 
demandant un numéro d'enregistrement 
et recherche en demandant les premiers 
caractères. Quelques explications : 

- BANKOPEN sert à fixer la longueur 
d'une fiche ; 

- R% est un "code de retour" (comme 
ERR en BASIC) ; égal à zéro si l'opéra- 
tion s'est bien passée. Il n'empêche qu'il 
faut l'initia! iser chaque fois à zéro, sinon 
plantage ; 

- avant d'écrire une chaîne, il est prudent 
de la compléter à L avec des blancs ; 

BANKFIND se contente des premiers 
caractères pour rechercher un enregistre- 
ment. R% est alors égal au numéro. Si 
pas trouvé R% est <0. Il est prudent 
d'indiquer les numéros limites, sinon les 
64 Ko seront explorés. 
Après tant de critiques, nous allons pas- 
ser à quelques envois de fleurs. Ils con- 
cernent des nouveautés en BASIC. 
Personnellement, je pense que le BASIC 
du 6128 est le plus complet et le plus 
agréable du marché. 

Les deux bugs corriges m 

Le BASIC du CPC 464 renferme deux 
bugs. C'est très peu pour un modèle de 
lancement (qui se souvient de ceux de 
l'Oric 1 ?). Ils avaient déjà été corrigés 
sur le fugace CPC 664. 
Il s'agit surtout du MERGE et du CHAIN 
MERGE qui ne pouvaient charger que 
desprogrammes BASIC sauvegardés en 
ASCII. Un peu gênant pour le MERGE 
mais qui condamnait complètement le 
CHAIN MERGE (voir CPC n° 10 page 
25), avec des temps de chargements en 
ASCII de l'ordre de trente secondes I 
Rappel : CHAIN MERGE permet dé dé- 



velopper des programmes énormes frag- 
mentés en modules qui viennent à tour de 
rôle se greffer à la suite d'un petit pro- 
gramme "programme-talon" qui lui est 
permanent. Les variables restent en 
RAM. Le logiciel peut totaliser 150 Ko 
sur la disquette, mais seulement les quel- 
ques kilo-octets dont a alors besoin sont 
chargés en mémoire. 
L'autre mot BASIC débugué c'est DECS, 
qui est un STRS qui calibre un nombre 
en chaîne avec la même syntaxe et les 
mêmes avantages que PRINT USING. 
Exemple N$ = DECS(N, "# ##.##"). 
A noter que ça marche sur 464 à condi- 
tion de mettre deux parenthèses ouver- 
tes au lieu d'une [le manuel du 464 ne 
parle pas de DECS). 

Les nouveautés basic mm 

COPYCHR$ - Je commence par celle- 
ci car c'est ma préférée. Positionnée suite 
à un LOCATE, cette fonction lit le carac- 
tère qui se trouve là sur l'écran. Exem- 
ple, après un CLS vous avez "Ready" 
écrit en haut à gauche. Tapez au- 
dessous : 

FORC=l T05:LOCATEC,l:XS = X$ + 
COPYCHR$(#0):NEXT:PRINT X$ 

On a ainsi récupéré dans X$ le message 
"Ready". La syntaxe exige d'indiquer 
le numéro de "WINDOW", ici #0 par 
défaut. Après cette démo volontairement 
simplette, voici un programme qui est à 
la fois super utile et super court. 
C'est une copie d'écran texte sur impri- 
mante, avec comme application pratique 
un CAT imprimé que l'on pourra glisser 
dans le boîtier de chaque disquette. Voir 
listing n° 3 ("EDICAT"). A part quel- 
ques fioritures, vous constaterez qu'il se 
résume à CLS:CAT:GOSUB 25000. 
Cette fonction est une mine d'or I 

DERR - Comble une lacune, c'est ERR 
pour les messages d'erreurs relatives à 
la disquette. Je m'explique : un pro- 
gramme bien fait doit être implantable 
suite à une fausse manœuvre de l'utili- 
sateur (= autre que vous). Le ON 
ERROR GOTO avec ERR et ERL permet- 
tent d'éviter le naufrage surprise (voir 
CPC n° 9 page 14), mais ERR (= error 
référence) ne concerne que le BASIC 
"pur". Le répertoire de gaffes est élargi 
par DERR (= dise error référence). 
Imaginons la réaction d'un pauvre utili- 
sateur qui lit "dise full" ou "file not 
found" avec un programme ainsi bien 
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planté. Il ne connaît pas le GOTO sal- 
vateur et aimerait bien alors vous ren- 
contrer dans un coin tranquille... D'où 
l'intérêt d'étendre la bouée de sauve- 
tage ON ERROR GOTO aux erreurs sur 
disques. 

Le programme FICHEXIST (listing n° 4) 
teste l'existence d'un fichier surla dis- 
quette en lui faisant subir un simple OPE- 
NlN (ligne 50). En cas d'absence 
DERR= 146, le "flag" FEXIST est mis à 
ligne 6501 0, puis RESUME sur la ligne 
CLOSEIN. 

Au retour le flag est testé. Dans notre 
exemple, on prévient que ce nom de 
fichier existe déjà sinon on continue (on 
aurait aussi pu faire l'inverse). 
Quelques remarques : 



- Le RESUME NEXT de la ligne 65010 
est aussi une nouveauté, il signifie 
RESUME sur la ligne suivant celle de 
l'erreur, ERL (ERL = error line) ; 

- Le ON ERROR GOTO ne supprime 
as le message AMSDOS "File not 

ound", d'où ce CLS ligne 90 suivi de 
notre message en français ; 

- Les erreurs type drive vide ou disquette 
non formatée n'ont pas de DERR corres- 
pondants. Ce n'est pas gênant puisqu'il 
n'y a pas plantage, mais l'opération 
"Retry". 

CLEAR INPUT est une précaution qui 
vide le buffer clavier, exemple : une 
opération longue (tri, etc.) fait croire à 
une anomalie, l'opérateur s'inquiète et 
tape quelque chose au clavier. Ces ca- 
ractères n'apparaissent pas encore à 
l'écran mais sont mémorisés dans le buf- 
fer clavier. Quand le micro a terminé sa 
tâche, il les affiche ou pire il les exécute 
s'ils correspondent à des options pour 
des menus suivants ! Le désastre... Un 
CLEAR INPUT programmé à la fin du 
long travail évitera cet avatar. 
Notons que sur 464, on obtient le même 
effet par CALL &BB03, mais le manuel 
ne le dit pas. 

ON BREAK CONT rend inactif l'action 
sur ESC ; non pas pour "embêter le 
client" mais pour lui éviter une classique 
maladresse en tapant le chiffre 1... On 
le désactive par ON BREAK STOP. 
Voyons à présent les nouveautés en gra- 
p h i s me . 

FILL - Enfin I Le remplissage en couleur 
d'une zone délimitée. Cela part de l'ori- 
gine graphique (ORIGIN) à condition 
qu'elle ne soit pas sur un trait. On a vu 
plus rapide... Notre programme "DE- 
MOFILL" (listing n° 5) sera plus parlant 



qu'un long baratin. Ne vous étonnez pas 
de ce GOSUB 54000 car il n'y a tou- 

I'ours pas CIRCLE. 
: RAME évite une animation saccadée. 
Oui mais ça on savait déjà faire par 
CALL &BD19 ; c'est exactement la même 
chose mais c'est plus focile à retenir I 
MASK, GRAPHICS PEN, GRA- 
PHICS PAPER - On sait enfin faire des 
traits en pointillés : MASK définit "l'al- 
longé" du pointillé, GRAPHICS PEN la 
couleur des tirets et GRAPHICS PAPER 
la couleur des "espaces" entre les tirets. 
Le nombre qui suit MASK constitue la 
forme du pointillé, car ce sera l'IMAGE 
BINAIRE répétée de ce nombre. Ainsi, 
MASK 240 conduira à des tirets de 
même longueur que les espaces, car 240 
en binaire donne 1 1 1 10000. Même effet 
avec 15 (00001 111) mais commencera 
par un espace. 

On obtiendra un motif plus serré avec 
204 (1 1001 100) ou plus "discret" avec 
224 (1 1 100000). Quant à MASK 270 
(10101010) il faut être en MODE 2 pour 
voir qu'il ne s'agit pas d'un trait 
continu... 

Le programme "DEMOMASK" (listing 
n° 6) illustre ce genre de tracé. 

Et les logiciels 

DU COMMERCE ina^wWM» 

Plusieurs jeux récents ne tournent que sur 
6128, non pas à cause du "BASIC-EN- 
PLUS" mais parce qu'ils utilisent le bank 
2. Soit pour y stocker des images ou des 
fragments d'images, tels certains jeux 
d'aventures avec graphismes élaborés, 
soit pour y loger des routines souvent 
appelées (certains tableurs). 
En revanche, des logiciels prévus pour 
le 464 plantent immédiatement sur 
6128, exemple le traitement de texte 
"TEXTOMAT". Pire encore, certains 
programmes qui tournaient sur les CPC 
464, 664 et 6128 QWERTY ou unique- 
ment sur ce dernier se plantent sur le 
6128 AZERTY I Donc soyez prudent et 
exigeant avant d'acheter un logiciel. 
Quoiqu'on disent certains vendeurs ou 
éditeurs de logiciels, le CPC 6128 n'est 
pas et ne peut pas devenir un micro 
"professionnel" et ce à cause de sa 
modeste mémoire. Ce n'est pas une cri- 
tique, au contraire I On prend bien plus 
de PLAISIR avec un petit bijou de CPC 
qu'avec un micro professionnel. Autant 
comparer une voiture sport avec son 
petit coffre face à une fourgonnette de 
six mètres de long I Ce ne sont pas du 
tout les mêmes usages. 



LISTING 1 



APPELECR - APPELS D'ECRANS sur 6128 - M. A. 2/88 -LA 

20 ' les RSX de BANKMAN doivent être de.ia en RAM par RU >LB 
N"BANKMAN" 

30 DEFINT A-Z-.I10DE 1:X=320: Y=200 M 

40 DATA 80.120.160.199 F. 

50 use en semoire des 4 écrans >LE 
60 FOR' E=2 TO SiREAD F, PE 
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70 CLS:G0SUB 54000:L0CATE 20.12:PF.INT E:LOCATE 1+E.13+E :'E 
:PRINT "Ravor': : 
80 ISCREENCOPY.E.l 
90 NEXT 

100 CLS:INPu7"Tape: ENTE? ".R*:CLS 
:: : FOR J=i TO 5:5CSUE SOOO:G03UB I 
NEXT 

-3CATE 1.12:PRINT "TERMINE"' 
!40 END 

Ecrans de 2 a 5 

FOR N=2 TO 5:CLS 

ISCREENCOPY.l.N 

'JEXT 
3040 RETUF.fi 

4000 ' Ecrans de 5 a 2 
4010 FOR N=5 TO 2 STEP-1:CL3 

ISCREENCOPY.l.N 

NEXT 
4040 RETURN 

54000 TRACE DE CERCLE 
54010 DEG:PLOT X+R.Y.l 
54020 FOR AZ=0 TO 360 STE? 10 

30 DRAN R*COS < A'/;> +X . R*BÎN (AX) +Y: NEXT 
54040 RETURN 



PU 

FE 
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10 ACCEDIR - 6 fiches en ACCES DIRECT 
20 ' création du fichier en PAN- I 
30 L=10 : ' longueur d'un enregistrement 
40 iBANKOPEN.L 

50 DATA PAUL. ANDRE. SEBASTIEN. CHANTAL. VERONIQUE. LAURENT 
60 FOR' 1=0 TO 5:READ A$ 
70 RZ=0 

80 A$=LEFT$(A$+SPACE*(L).L): ' on complète a L avec des 
blancs 

90 !BANKWRITE.«X.A$.I 
100 NEXT 

200 ' Lecture et mise en RAM 
210 CLS 

220 INPUT"NUMERO de a 5 (9=auitter) : \N 
230 IF N=9 THEN RUN 300 

240 C$=SPACE*ÏL): ' on initial ise avec des blancs 
250 îBANKREAD.eRX.Ct.N 
260 PRINT *-":«: "-" 
270 GOTO 220 

RECHERCHE 
310 CLS:L=10 
320 RX=0:B$=SPACE$(L) 

330 LINE INPUT"entre: le début d'un prénom : ",P$ 
340 :BANKFIND.3R7..P*.0.5 : entre et 5 
350 IF R7.<0 THEN PRINT"PAS TROUVE" :GOTO 390 
360 N=RX:RX=0:B$=SPACE*<L) 
370 !BANKREAD.êRX.B$.N 
380 PRINT" fiche numéro" :RX:"= ":B* 
390 PRINT.-GOTO 320 
CPÇ n° 35 ■ Juin 1988 



LA 

LE 

>WF 

>LP 

FI 

PC 

>NG 

,WV 

TB 
>DG 
>RC 

TH 
RN 
>0B 
>LK 
>RW 
NIA 

>RD 

>FA 
FF' 
>DV 
>VE 
>MF 
>VZ 
>RY 
>GG 
>NC 



LISTING 3 



10 EDICAT - édite CAT Par COPYCHRS - K.A. 2/88 

20 CLS:LINE INPUT n disQuette (Nom. nut.): ".RfcPRINT 

30 IF Ri-/"" THtN N$=R$ 

40 INPUT-Face (A/B) ".F« 

50 PRINT 18. "Disquette ":N«:" - face ":F« 

S:CAT 
70 G05UB 25C ' 3 
80 GOTO 20 

Copie d'écran texte en MODE 1 
25010 FOR L=l TO 25: FOR C=l TO 40 
25020 LOCATE C. L: PRINT». COPYCHRS (10): 
25030 NEXT:PRINT»S 
25040 NEXT 
25050 RETURN 



30 x=7 :R=150:G0SUE 54 

40 R=80:G0SUB 54000 

50 ORIGIN 172.200 

60 FILL 3:FILL 2:FILL 

70 ORIGIN 320,200:FILL 2 

80 ORIGIN 0.0: FILL 3 

90 INPUT "RETURN ",R$:CLS 

100 END 

54000 ' TRACE DE CERCLE 

54010 DEG:PLOT X+R.Y.l 

54020 FOR AX=0 TO 360 STEP 10 

54030 DRAW R*COS(AX)+X.R*SIN(AX)+Y:NEXT 

54040 RETURN 



LISTING 5 

10 DEMOMASK - MASK. GRAPHICS PAPER. GRAPHICS PEN 

20 MODE 

30 6RAPHICS PEN 3 

40 GRAPHICS PAPER 2 

50 PLOT 0.200 

60 MASK 240:DRAHR 640.0 

70 GRAPHICS PAPER 

80 PLOT 0.100:DRAWR 640.0 

90 PLOT 0.0 

100 6RAPHieS PAPER 1 

110 DRAWR 640,400 

120 INPUT-RETURN \R*:MODE 1 



EU 

FF 

>UF 

NT 

NE 

PH 

n 

GO 
>NH 
>R| 



LISTING 4 

10 DEMOFILL - demc ae FILL - M.A. 2/88 

20 CLS:ORIGIN 0.0: LOCATE 3.":FRIN T "DEMO de FILL :FRINT DT 



II 

NH 
>LV 

>0M 

RK 
<NP 

:>vf 

>RE 
>DE 
>RG 
)UP 
;hk 
>MF 



LA 
>BD 
>LA 
>NH 
>EJ 
>0V 

;>nj 

TU 
>RK 
>P0 
>LR 
>XV' 

7 



MIRAGE IMAGER version TURBO 

enfin le TRANSFERT et la SAUVEGARDE ULTRA-RAPIDES ! 



RECHARGEZ UN PROGRAMME DE 64 Ko EN 14 SECONDES ! 

APRES L'AVOIR TRANSFERE EN UNE VINGTAINE DE SECONDES 

avec la version TURBO du MIRAGE IMAGER 

LE PERIPHERIQUE QUI TRANSFERE et SAUVEGARDE 
100 % DES PROGRAMMES 

LE MIRAGE IMAGER TURBO 



CPC 464/664 : 

seulement450 FF 
Port compris 




CPC 6128: 
seulement 500 FF 

Port et câble 6128 compris 

S.V.P. Spécifier si le connecteur 

du BUS D'EXPANSION est mâle ou femelle. 



MANUEL COMPLET de 3000 mots entièrement en Français 

Le MIRAGE IMAGER version TURBO est disponible maintenant. 
Chez nous, la RUPTURE DE STOCK N'EXISTE PAS. 



Ses caractéristiques : 

SAUVEGARDE 64 Ko SUR DISQUETTE EN UNE VINGTAINE DE SECONDES 

RECHARGE UN PROGRAMME DE 64 Ko EN 14 SECONDES ! 

TRANSFERT K7 / DISQUETTE ou DISQUETTE / CASSETTE et SAUVEGARDE K7 / K7 ou 

DISQUETTE / DISQUETTE de tout programme protège ou non jusqu'à 128 Ko (64 Ko sur 464/664) 

SAUVEGARDE K7 EN 3 VITESSES (normale, rapide et TURBO) 

TOOLKIT incorpore qui affiche les adresses. INK, PEN et autres détails des programmes 

et écrans, permettant un bidouillage acharne et intensif. 

Grice au TOOLKIT. contemplez instantanément les résultats des bidouillages effectues ! 

MODE 64 K ou 128 K avec les CPC 6128 

Se branche en 2 secondes ! 

Extrêmement simple à utiliser : gère par menus et l'on presse UN SEUL BOUTON pour 



transférer/sauvegarder /recharger. 

Ne prend aucune place en HAM. n'est donc pas détectable par l'ordinateur. 

Très amical, détecte les erreurs de l'opérateur 

8 K RAM et 8 K ROM incorpores 

Compresse afin d'utiliser un espace minimum sur disque ou cassette 

Sauvegarde er un seul bloc (pratique pour archivage) 

Compatible avec les ROMS et cartes d'extension et permet aussi de les invalider 

Pour usage personnel 

Comporte un bus d'extension pour raccorder d'autres périphériques 

Stoppez un jeu a n'importe quel moment, sauvegardez et reprenez-le au même endroit 

TOUS les programmes transférés fonctionnent ! 



VENTE PAR CORRESPONDANCE - Envoyez votre commande (en Français) directement à : 

DUCHET Computers - 51, Saint-George Road - CHEPSTOW NP6 5LA - ANGLETERRE - Téléphone : +44 - 291 257 80 

ENVOI IMMEDIAT LE JOUR MÊME PAR AVION dans le Monde entier (Hors Europe ajouter 25 FF S.V.P.) 

REGLEMENT à l'ordre de "DUCHET Computers" par : 

MANDAT POSTE INTERNATIONAL en Francs 

EUROCHEQUE personnel en livres sterling (vous faites la conversion) 

CHEQUE BANCAIRE en livres sterling compensable en Angleterre établi par votre ban que 

CHEQUE PERSONNEL Français bancaire.____libellés en Francs 

mi Carte de crédit internationale VISA EUROCARD, MASTERCARD, ACCESS j 

^J' (indiquez n° de carte et date de validité, mais n'envoyez pas voire carte) 

Si vous êtes pressé, réservez votre commande EN PARLANT EN FRANÇAIS 
Téléphonez à Caroline, Jean-Pierre ou Didier au 44 291 257 80. 
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DISCOLOGY 

5 V Méridien informatique 

• I 



^ 1 1 s'agit certainement 
I de l'utilitaire le plus 
I connu et le plus se- 
cret du petit monde de l'in- 
formatique Amstradienne. 
En effet, le nom de Disco- 
logy circule partout, mais 
sous le manteau. 

La partie émergée de l'ice- 
berg étant constituée par le 
copieur. Nous ne parlerons 
ici que de l'unique copie de 
sauvegarde autorisée par la 
loi. Il n'est pas question de 
faire ici l'apologie du pira- 
tage, mais bien de souligner 
les points forts d'un utilitaire 
pour disquettes. 
Et des points forts, il en pos- 
sède le bougre ! Jugez-en 
plutôt : le menu vous pro- 
pose trois options : l'éditeur, 
le copieur et l'exploreur. 
Avant d'examiner chaque 
module, il faut noter que la 
présentation est à chaque 
fois la même : des zones 
réservées contenant les têtes 
de rubriques ainsi que les 
menus déroulants. Les 
options sont accessibles 
grâce aux touches fléchées. 
En fait, cinq touches sont 
amplement suffisantes pour 
utiliser quasiment toutes les 
caractéristiques de ce 
programme. 

L'EDITEUR H^HHB 

C'est le module le plus 
fourni en menus (il en pos- 
sède dix). Tout d'abord, les 
"modes" permettent de 
définir une édition par pis- 
tes, par secteurs ou par 
fichiers. Cette dernière fonc- 
tion est d'ailleurs très perfor- 
mante puisqu'elle indique le 
début d'un fichier et le nom- 
bre de blocs occupés par 
celui-ci. 



L'édition peut se faire en 
hexa et en ASCII, en hexa 
seul ou en ASCII seul. Les 
déplacements de 256 en 256 
octets peuvent être manuels 
ou automatiques ainsi que 
l'écriture de secteur. 

Méfiance donc : lorsque 
vous changez de secteurs, 
votre disquette risque une 
écriture inopportune. Les 
ordres physiques et logiques 
concernent l'organisation 
des secteurs qui ne se suivent 
pas forcément par numéros 
croissants (cela permet une 
plus grande vitesse d'accès 
aux secteurs). La visualisa- 
tion des secteurs peut se faire 
en décimal, octal, binaire ou 
hexa (l'option par défaut). Si 
l'on choisit bien l'octet de 
départ, on peut lister un pro- 
gramme en BASIC directe- 
ment et même désassembler 
sur écran ou imprimante une 
partie de secteur. La fonc- 
tion "coder" permet de 
décrypter certains fichiers en 
employant une "clé" ou au 
contraire de coder vos 
fichiers. Vous trouverez éga- 
lement une recherche de 
caractères, des fonctions 
couper, copier, coller : vous 
définissez un bloc d'octets 
que vous pouvez déplacer ou 
copier n'importe où sur la 
disquette. Le menu divers 
vous propose un catalogue, 
une calculatrice et le choix 
des couleurs de l'écran. Les 
divers messages affichés en 
permanence concernent le 
secteur et le bloc en cours 
d'édition ainsi que les diffé- 
rents modes de travail (ma- 
nuel ou automatique). 

LE COPIEUR ^HM 

C'est la partie la plus "sen- 



sible" de Discology. Les per- 
formances sont là aussi au 
rendez-vous : deux systèmes 
de copie peuvent être utili- 
sés : la copie rapide et la 
copie intégrale, toutes deux 
possèdent une routine de 
compression qui permet de 
diminuer le nombre d'échan- 
ges de disquettes. De plus, 
grâce à la reconnaissance des 
types de machines (464-6128), 
Discology se réserve un buf- 
fer en conséquence : 27 Ko 
pour les 464 et 86 Ko pour 
les 6128. Ceci autorise une 
rapidité de traitement exem- 
plaire pour celui qui ne con- 
naît pas DISCKIT 3 du 
CPM + . Discology recon- 
naît 100 pistes, des flopées 
de secteurs ainsi que la den- 
sité employée. 

Les copies de fichiers sont 
possibles de disquettes à dis- 
quettes et de cassettes à dis- 
quettes. Toutes ces fonctions 
bénéficient également du 
buffer. Ainsi, il est souvent 
possible de copier tous les 
fichiers contenus sur une dis- 
quette en une seule "pas- 
se" ; quoi de plus rapide ? 
Les programmes sur casset- 
tes bénéficient d'une vitesse 
de lecture paramétrable et 
d'une routine de "reloge- 
ment" (utile pour les fichiers 
binaires implantés assez haut 
dans la mémoire). 

L'EXPLOREUR M^M 

Il s'agit du seul utilitaire sur 
Amstrad, à ma connais- 
sance, qui offre ce type de 
fonction : une représenta- 
tion graphique du disque 
courant. L'exploration peut 
porter sur la "structure" du 
disque c'est-à-dire l'organi- 
sation des pistes et des sec- 



teurs. L'autre partie propose 
la localisation des fichiers 
sur la disquette et la visuali- 
sation de l'occupation glo- 
bale du disque. 
L'exploration "étendue" 
porte le nombre de pistes 
accessibles à 43 (à n'utiliser 
qu'avec prudence, certains 
lecteurs de disques ne pou- 
vant pas s'en remettre). 
Les déplacements sur le 
"plan" sont effectués grâce 
aux touches fléchées : le sec- 
teur apparaît alors en 
"grisé" pendant que sur une 
fenêtre auxiliaire s'affichent 
les caractéristiques de la 
piste et du secteur. Vous 
pourrez également connaître 
les adresses d'implantation, 
d'exécution et la taille réelle 
des fichiers présents au cata- 
logue. 

Ces trois modules sont rat- 
tachés les uns aux autres et 
il est possible de revenir au 
menu pour répartir sur l'un 
d'entre eux ces sous- 
programmes. Que dire de 
plus si ce n'est de souligner 
la convivialité du pro- 
gramme : menus déroulants, 
utilisation simplissime, la 
rapidité et les performan- 
ces : le formatage DATA 
s'effectue en 14 secondes !, 
lecture de secteurs allant 
jusqu'à 4096 octets. Si on y 
ajoute la possibilité de tra- 
vail sur un deuxième lecteur 
(3", 3"l/2 ou 5"l/4), le 
changement des couleurs de 
l'écran, les différentes sor- 
ties sur imprimante ainsi que 
la fonction "Aide" présente 
dans les 3 modules, on 
obtient l'un des meilleurs, si 
ce n'est le meilleur utilitaire 
sur Amstrad toutes catégo- 
ries confondues. A posséder 
absolument* 
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LORICIEISVA 

Le petit chat se lance dans le sponsoring I A l'occasion 
de la Porsche Turbo Cup, une voiture aux couleurs de 
l'éditeur sera conduite par le célèbre Reflé METGE. Tous 
les véhicules sont identiques puisqu'il s'agit de Porsche 944 
Turbo. La coupe sera disputée au long de 10 épreuves 
du 16 avril au 16 octobre. 

On annonce également la sortie de Space Racer sur 
Amstrad. 

Il s'agit d'une course en 3D opposant des motocyclistes 
du futur, épuipés de machines volantes. Seul un raie placé 
au sol guide les concurrents. La violence étant de mise, 
il n'est pas interdit de tirer sur ses adversaire I 



CASCADE 
GAMESt> 

Ace n'est pas un nou- 
veau produit. Après 
avoir été vendu à des 
milliers d'exemplai- 
res, ce simulateur de 
combat retrouve une 
nouvelle jeunesse 
dans la gamme bud- 

get intitulée GAME- 
USTERS. Ce pro- 
gramme est disponi- 
ble sur disque ou cas- 
sette aux prix respec- 
tifs de £ 2.99 et £ 
4.99. 





A TE A 
EDfTIONv 

Si vous êtes un utilisa- 
teur acharné de 
Turbo Pascal 4.0, 
Turbo Professionnel 
et TDebug plus vous 
seront bientôt indis- 
pensables. Turbo 
Professionnel pro- 
pose 400 procédures 
et fonctions tout à fait 
optimisées. Ces nou- 
velles fonctions con- 
cernent l'arithmétique 
BCD, la gestion de 
menus déroulants, les 
fonctions du DOS, les 
gestions de chaînes, 
tes tableaux etc. Vous 
trouverez de plus des 



programmes de 
démonstration (table 
de références, calcu- 
latrice, comparaison 
de fichiers). 
TDebug plus permet 
le contrôle de vos 
programmes en Tur- 
bo : mise à jour des 
variables, points 
d'arrêts condition- 
nels, fenêtre sur la 
mémoire. Enfin Over- 
lay manager vous 
autorise à briser la 
barrière des 640 Ko 
en "liant" des modu- 
les de recouvrement. 

ATEA EDITION 
98, rue Giraudeau 

BP 1203 
37012 Tours Cedex. 



JE SUIS PARTOUT 

PC Anywhere est un logiciel de mainte- 
nance à distance, un moyen de commu- 
nication entre micro-serveur, terminaux 
et PC (ou PS). Pour l'utiliser, il suffit d'un 
modem compatible HAYES ou d'un mini- 
tel. 

Le logiciel peut être utilisé pour des 

démonstrations à distance ou bien, grâce 

à un second programme (ATERM), pour 

piloter, par exemple une imprimante 

laser, un réseau local... 

L'importateur français est : 

Société MAXOTEX 

13, rue du Maubuisson Menilles 

27120 Pacy/Eure 

14 



JUSTICE 

A la suite d'un article 
paru dans Micro ID la 
société MIVEA Presse 
a été condamnée par 
le tribunal de com- 
merce de Rennes 
pour délit de dénigre- 
ment en matière de 
presse. Les éditions 
SORACOM obtien- 
nent le franc symboli- 
que de dommages et 
intérêts. 




MTEk 
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MICROMANIA 

Le minitel se prête décidément à tou- 
tes les utilisations ludiques. Après 
quelques jeux d'argent ou de 
réflexion, le Scrabble est mis à la 
sauce télématique par Micromania 
associé à Virgin Electronic Publis- 
hing. Le serveur est supporté par un 
ALTOS 2000 sous UNIX gage de 
rapidité et de puissance de traite- 
ment. En effet le 36.15 SCRAB 
donne accès à un système de jeu à 
distance ou en local. Le jeu en 
"forum" oppose 50 joueurs en 
simultané. Une option "aide" peut 
vous permettre de progresser, trois 
fois par semaine, Michel Duquet 
champion du monde de Scrabble 
joue en duplicate contre vous. Le 
duplicate permet un jeu plus équili- 
bré puisque le hasard y occupe 
beaucoup moins de place (les 
joueurs ont les mêmes tirages et ten- 
tent d'obtenir le score le plus élevé). 




MANDARIN SOFTWARE > 

Un nouveau département d'Europress s'associe avec 
Level 9 afin de produire une série de jeux de haute 
qualité. Cette série a été entamée par Time & Magik 
un coffret regroupant 3 aventures : Lords of Time, Red 
Moon et Price of Magik. On annonce également la sor- 
tie de Starquake,un classique des jeux d'arcade, sur 
IBM PC. 



UPGRADE 
EDITIONS 

SOLUTION est dorénavant 
disponible sur PC. Ce pro- 
gramme de gestion commer- 
ciale écrit sous GEM offre à 
la fois puissance et convivia-i 
lité. On trouve au menu, la 
gestion des en cours, des reli- 
quats de commandes, des 
stocks. Un générateur d'états 
permet de configurer les 
états de sortie. Les menus 
déroulants et le fenêtrage 
participent à l'ergonomie du 
programme. 

Prix sur PC : 2 490 F HT 
UPGRADE EDITIONS 
30, rue Coriolis 
75012 PARIS 



SIFAV 

Pour les passionnés d'étiquetage voici LABELMAKER, un 
logiciel d'origine anglaise. Les étiquettes sont représen- 
tées à l'écran, il reste à définir les zones de données 
(jusqu'à 450 x 280 mm) ainsi que des polices de caractè- 
res. La sortie peut se faire sur une imprimante laser ou 
matricielle. 
Pour tous renseignements : 

SIFA 

292, rue des Fusillés 

BP713 

59657 Villeneuve d'Ascq 
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BRISTISH TELECOM 

Des châteaux, des charmes de la 
magie, des guerriers à la recher- 
che d'ossements sacrés ce sont 
les ingrédients de GOTHIK un 
jeu d'arcade, bientôt disponible 
sur Amstrad et aui devrait pas- 
sionner les duellistes puisqu'il 
existe une option à deux joueurs. 



GOLFV 

Il existe déjà plusieurs logi- 
ciels de golf sur nos ordina- 
teurs domestiques : Game of 
Golf, Golf Champion Ship, 
Great Golf, Leader Board et 
World tour Golf. Je vous le 
donne en mille les logiciels 
précités seront les nomimés 
du premier oscar du logiciel 
de golf 1988. Quand ça ? Le 
jeudi 16 juin à 15h00. Où 
ça ? Dans l'auditorium de la 
FNAC Etoile. Un concours 
sera également organisé tous 
les jours sur Leader Board 
(US Gold) avec de nombreux 
prix à la clé. Pour les purs et 
durs un "practice" se trou- 
vera près de l'auditorium. A 
vos clubs ! 
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GREMUNA 

Blood Brothers met en scène deux frères 
Hark et Kren, habitants heureux d'une 
douce planète appelée SYLONIA. Mais 
les méchants Scorpions ont dérobés une 
grande quantité de minerai, seule res- 
source le SYLONIA. Les deux frères sont 
alors envoyés sur SCORPIA pour récu- 
pérer toutes ces matières premières. Ils 
disposent pour cela de Jet-Bike ainsi que 
de lasers portatifs. 
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INFORMATIQUE 

Dans Sky-Hunter vous êtes 
un droïde parti à la recher- 
che du fils de l'empereur de 
toutes les galaxies. C'est à 
l'intérieur d'un char de com- 
bat que vous affronterez les 
dangers d'une planète incon- 
nue. 

Prix : 140 F sur cassette et 
180 F sur disque. 
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LCII 

La comptabilité informatique 
n'est pas forcément synonyme 
de lourd et peu maniable. THE- 
MIS, un logiciel écrit en Turbo 
Pascal, offre ses menus dérou- 
lants et ses fenêtres aux ofisan:, 
et chefs d'entreprise possesseur : 
d'un PC. De plus grâce à un uti- 
litaire (TOOLS BÛILD) inclus, la 
réparation des fichiers endom- 
magés est automatique en cas de 
coupures de courant. 

LCII informatique 
49, rue Lamartine 

78000 Versailles 



CASCADE GAMES BIS 

Nineteen votre âge en 1965. Vous avez 
la malchance d'être né au Etats-Unis. En 
effet, vous êtes bon pour le service et ce 
qui vous attend, c'est le Viet-Nam. Ce 
logiciel comprend en fait 2 parties. La 

f>remière concerne votre entraînement et 
a deuxième partie vous mettra en situa- 
tion sur le théâtre des opérations. 
Remember Apocalypse Now et Full 
métal jacket. 



UBI SOFT 

La société d'édition ludique se lance à 
l'assaut du marché mondial et pour réus- 
sir dons cette entreprise, elle s'est offert 
les services de John Forrest, ex-directeur 
de distribution chez Electronic Arts. 
De plus un contrat de licence avec EPYX 



permettra la distribution d'au moins 7 
titres aux States (Iron Lord Skateball). 

Enfin dernier volet d'UBI SOFT partant 
à la conquête de l'univers, l'Europe est 
visée par UBI et des distributeurs sont 
activement recherchés dans toute la 
Communauté (1992 approche I). 




MICR0M0TE. : 2 remps 5 cm/3 250 W à 18000 rr/mn 



Dessiné avec RoboCAD 
Tiré sur ALPS P2i00C 



AMEREX INTERNATIONAL AV 

Cette société américaine s'étend en Europe et s'installe 
dès 1988 en Espagne, au Royaume-Uni, au Bénélux 
et en Italie. Les imprimantes sont sa spécialité. Le 
schéma ci-contre est tiré sur l'ALPS P2400C, il s'agit 
d'une imprimante matricielle et pas d'une table tra- 
çante ! Celle-ci possède 18 ou 24 aiguilles et 7 
couleurs. 

Une carte graphiaue de 13,2" (ImagEnhancer) pos- 
sédant un buffer de 512 Ko permet la sortie de gra- 
phismes "vectoriels" sur imprimante. Tous les compa- 
tibles IBM (PXT,AT) pourront recevoir cette carte qui 
permet d'obtenir des résultats assez surprenants. 
Signalons également une petite matricielle AMEREX 
P150 compatible PC et CPC à un prix raisonnable 
(2 183 F HT). 

AMEREX INTERNATIONAL 

6/8 avenue Salvador Allende 

93800 Epinay/Seine 
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5" 1 /4, 
J'EN VEUX !! 

®P. DELIAS 

Une mécanique 5 "1/4 à 
moins de 700 F, la disquette 
à moins de 3 F et il n'en faut 
pas plus pour avoir envie de 
se lancer dans la fabuleuse 
cuisine ' 'électron ico- 
informatique". 
Bien évidemment un 
minimum de temps et un peu 
de patience seront nécessaires 
pour mener à bien cette 
recette qui s'adresse 
uniquement aux possesseurs \S 
de CPC 6128 et CPC 664. 




E 



ou l'art et la manière 
d'accommoder le 

5" 1/4 à la 
sauce Amstrad. 



Cependant, s'il ne s'agit pas 
d'être un crack de l'électronique 
ou de l'informatique pour réus- 
sir cette recette, il faut au moins savoir 
souder, percer et être attentif aux con- 
seils qui sont donnés. C'est pourquoi le 
maximum sera fait tout au long de ces 
pages pour être aussi clair que possible 
et pour donner le plus de détails. 



Commencez donc par chausser vos Cha- 
rentaises, prenez un verre de votre bois- 
son favorite, installez-vous confortable- 
ment et attaquez la lecture. Un conseil 
toutefois : n'hésitez pas à relire deux fois 
le même passage avant d'en exécuter les 
opérations. Ne courez pas non plus tout 
de suite acheter vos composants, atten- 
dez d'être à la fin de l'article, vous vous 
éviterez des dépenses inutiles. 
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Dons toute recette, il faut avant tout éta- 
blir la liste des ingrédients nécessaires. 
Voici la nôtre : 

— 1 lecteur 5" 1 /4 (double face 40 pis- 
tes type Tandon TM- 100-2 A) 

— I câble 34 conducteurs (pas plus 
d'1 m, type liaison imprimante) 

— 2 connecteurs 2x17 broches (type 
Amphénol réf. 225f-34) 

— 1 transformateur 2x1 2V 26V A 

— 2 ponts de diodes PBP201 (ou 
équivalent) 

— 2 condensateurs chimiques 2200uF 
25V 

— 2 condensateurs au tantale IOuF 16V 

— 2 condensateurs polyester lOOnf 

— 1 résistance de puissance 10 ohms 
10W 

— 1 régulateur 7805 CT (ou CV) 

— 1 réaulateur 7812 CT (ou CV) 

— 2 rerroidisseurs pour régulateurs 

— 1 porte-fusible 

— 1 fusible 160mA 

— 1 inverseur unipolaire 2 positions 

— 1 inverseur simple 2 positions 1A 
250V 

— 1 micro-switch miniature à levier 1 RT 

— 1,50 m de fil 0,5 mm 2 (type lampe 
de chevet) 

— 1 fiche secteur mâle 

— 0,50 m de fil de câblage de couleur 
à 10 conducteurs (0,4 mm 1 ] 
Maintenant nous somme prêts à commen- 
cer notre petite recette. Mais, dans tout 
repas, avant de passer à table, il est de 
coutume de prendre l'apéritif. C'est ce 
que nous vous proposons sans plus tar- 
der, ou, en clair, un rappel sur quelques 
généralités. 
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Les disquettes 

Dès le premier contact on se rend tout 
de suite compte que la disquette 5" 1/4 
est beaucoup plus fragile que son homo- 
logue 3". 

Voyons plutôt comment est fabriquée une 
disquette de ce genre. 
Elle se compose d'un disque de mylar 
recouvert sur toute sa surface par un 
oxyde magnétique. Ce disque tourne 
dans une pochette plastifiée, à une 
vitesse de 300 tr/mn. Sur cette pochette 
on peut remarquer quatre ouvertures 
principales (fig. 1) : 

— une découpe de forme rectangulaire 
qui est la protection d'écriture ; 

— un trou central qui permet au méca- 
nisme d'entraînement de pincer la dis- 
quette et de la faire tourner (fig. 1 et 2) ; 

— un petit trou circulaire légèrement 
excentré qui est le trou d'index. Ce trou 
est aussi pratiqué sur le disque en mylar. 
Le lecteur détecte son passage devant 





celui de la pochette et à chaque fois 
envoie le signal d'index. A ce propos, 
nous verrons un peu plus loin et en détail 
les différents signaux existants ; 
— un trou oblong qui permet aux têtes 
de venir lire et écrire les informations. 
Comme nous pouvons le constater, à la 
différence du 3", il n'y a aucune protec- 
tion sur cette ouverture. Il faudra donc 
être très prudent et ne jamais poser ses 
doigts à cet endroit. 



Du fait de la relative fragilité de ces dis- 
quettes, il est important de toujours les 
replacer dans leurs pochettes en papier 
après usage. De plus il est préférable de 
les ranger dans une boîte prévue à cet 
effet. 

LES DIFFERENTS TYPES 

DE DISQUETTES 

Il faut distinguer différents types de dis- 
quettes : 



SOUS QUELLE 

ETOILE 
SUIS-JE NE ? 



^^^^\ 



350 F 

La disquette pour CPC 

HORLOGE 
ASTRALE 



PREVISIONS 
ASTRALES 

Un logiciel qui vous fera une étude prévisionnelle approfondie 

d'une période donnée , un jour, un mois, un an ou plus; 

(analyse des transits des planètes sur le ciel natal) . 

OoU JP 2 disquettes pour CPC 6128 



MIROIR ASTRAL et PREVISIONS ASTRALES existent 
aussi pour PC au prix de 420 F chacun. 



* Carte du ciel avec copie d'écran sur imprimante. 

* Horloge permettant de suivre les positions 
planétaires en temps réel. 

Calcul des Révolutions solaires. 

Méthode JONAS : calcul des jours de fécondité astrale. 

* Nombreux calculs astronomiques 

(lever et coucher de Lune et de Soleil, éclipses,...) 



MIROIR ASTRAL 

Calcul et analyse du ciel natal. 

Une astropsychanalyse de 15 pages sur imprimante. 

Un logiciel qui vous surprendra par sa profondeur... 

\5Zi\J X 1 LA DISQUETTE POUR CPC. 



BON DE COMMANDE 

A renvoyer à URANIE Software 

B.P. 84 - 83110 SANARY - Tél. 94 74 32 00 
Nom : 

Adresse : 



Ordinateur 



Je vous commande : 

□ 1 logiciel "MIROIR ASTRAL" 

□ 1 logiciel "PREVISIONS ASTRALES" 

□ 1 logiciel "HORLOGE ASTRALE" 
ci-joint mon règlement par chèque bancaire 
ou OOP (port GRATUIT). 
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- les SIMPLE FACE 

- les DOUBLE FACE 

En THEORIE, les SIMPLE FACE n'ont 
qu'un seul côté imprégné d'oxyde alors 
que les DOUBLE FACE ont les deux. 
C'est pour cela que l'appellation est dif- 
férente. Cependant, il est possible d'uti- 
liser les SIMPLE FACE comme les DOU- 
BLE FACE car la couche d'oxyde est tout 
de même présente sur les deux faces 
(essayez donc de faire une crêpe qui 
n'aurait qu'un seul côté I). Quoiqu'il y 
ait bien ce Breton de père Auvergnat... 

Il peut, mais très rarement, subsister un 
problème au niveau de la lecture ou de 
récriture. Pour le moment sur 400 dis- 
quettes, aucune n'a présenté ce genre de 
problème et cette recette a été réalisée 
sur trois 6128 et un 664 au mois de juil- 
let 1987 et aujourd'hui encore on en 
apprécie toute la saveur. Le deuxième 
point qui différencie ces disquettes est 
que les DOUBLE FACE sont garanties 
sans erreur", c'est-à-dire qu'elles subis- 
sent des tests pour vérifier qu'il n'y a 
aucun problème de lecture ou d'écriture 
sur les deux faces. C'est donc à vous de 
voir laquelle des deux vous désirez. Bien 
I Après cet apéritif, si nous passions à 
la salle à manger pour attaquer les hors- 
d'oeuvre ? 

Le lecteur 

Le choix retenu pour cette recette s'est 
porté sur un TANDON TM 100-2A. Il 
s'agit d'un lecteur 5" 1/4 de taille nor- 
male, 40 pistes - 48 TPI, DOUBLE FACE 

- DOUBLE DENSITE. 

Ce genre de lecteur était utilisé sur les 
IBM-PC, XT, PORTABLES et compatibles 
avant l'arrivée des HALF-SIZE (demi- 
hauteur). 

Pour cette recette il s'agit d'une récupé- 
ration faite sur un IBM-PC. Cependant 
de nombreuses maisons d'électronique 




d'informatique) vendent ce type de lec- 
teur ou son équivalent. 
En outre, son temps d'accès piste à piste 
est de 3 millisecondes et sa vitesse de 
rotation de 300 trs/mn. Ces caractéristi- 
ques sont très importantes car elles con- 
ditionnent le bon fonctionnement du lec- 
teur et la réussite de notre plat. Pour ce 
qui est du temps d'accès piste à piste il 
ne doit en AUCUN CAS excéder 8 mil- 
lisecondes (contrairement au CPC 464 
qui admet 12 ms). Vérifiez aussi au 
moment de l'achat que votre lecteur est 
bien à la norme SHUGART, sinon les 
connections décrites plus loin ne seront 
pas valables. 

Passons maintenant en revue les diffé- 
rents signaux de communication entre le 
lecteur et le CPC. 

Les signaux du cpc 

Avant d'énumérer ces différents signaux, 
il est important de préciser qu'ils sont dits 
"ACTIFS" lorsqu'ils sont à volt, c'est- 
à-dire à la MASSE. C'est pour cela que 
vous les trouverez sur vos manuels avec 
leur nom surmonté d'une barre (ex. : 
STEP). En électronique on dit STEP 
BARRE. Pour simplifier les choses, nous 
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avons volontairement omis ces barres 
dans notre article. Après cette petite pré- 
cision, rentrons directement dans le vif du 
sujet. 

READY : signal généré par le lecteur 
lorsqu'il est prêt à recevoir les ordres de 
lecture ou d'écriture (disquette en place). 
SIDE 1 SELECT : signal de sélection de 
la tête de lecture dans les lecteurs dou- 
ble face. Ce siqnal n'est pas utilisé sur 
un lecteur simple face. Il est tout à fait 
possible de commander ce signal en pro- 
grammant le contrôleur de disquette, 
mais une solution plus simple a été rete- 
nue : l'utilisation d'un inverseur qui per- 
mettra de changer de face par un sim- 
ple basculement. 

READ DATA : c'est par cette liane que 
les données lues seront envoyées vers 
l'ordinateur. 

WRITE PROTECT : signal émis par le lec- 
teur pour indiquer que la protection 
d'écriture est activée (découpe 
obstruée). 

TRACK : signal envoyé par le lecteur 
pour indiquer que la tête est positionnée 
sur la piste de départ (0). 
WRITE GATE : signol émis par l'ordina- 
teur pour indiquer qu'une écriture est en 
cours. 

WRITE DATA : ligne de transmission uti- 
lisée pour envoyer les données à écrire 
sur la disquette. 

STEP : signal de commande qui fait 
avancer la tête d'une piste dans le sens 
défini par le signal DIRECTION SELECT. 
DIRECTION SELECT : signal sélection- 
nant le sens du déplacement de la tête 
du lecteur (piste à piste). 
MOTOR ON : signal activant le démar- 
rage du moteur qui commande la rota- 
tion de la disquette. 
DRIVE SELECT 1 : signal de sélection du 
lecteur 1 (externe — B). 
INDEX : signal en provenance du lecteur 
qui indique que la détection du trou 
excentré présent sur la disquette est 
effectué et donc qu'une disquette est en 
rotation dans le lecteur. Ce signal est 
délivré par un capteur optoélectronique. 
Toutes les broches PAIRES sont connec- 
tées à la masse. L'ensemble de ces 
signaux est représenté sur la figure 3 
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ainsi que sur le manuel de l'utilisateur du 
CPC, chapitre 7 page 40. 

Les signaux 
du lecteur 5" 1/4 

Ces signaux sont eux aussi ACTIFS de 
la même manière que sur l'AMSTRAD. 
On retrouve bien sûr une grande partie 
des signaux du CPC (sans quoi cela ne 
pourrait fonctionner), mais aussi quel- 

Sues autres dont voici la description : 
RIVE SELECT : signal de sélection du 
lecteur (ou A). 

DRIVE SELECT 2 et DRIVE SELECT 3 : 
sont deux siqnaux représentant les lec- 
teurs 2 et 3 (C et D). tes signaux ne sont 
pas prévus d'origine pour être utilisés 
avec un CPC. Le contrôleur (FDC PD765 
A) pourtant capable de gérer quatre lec- 
teurs n'est câblé, ici, que pour en pilo- 
ter deux. 

HE AD LOAD : signifie chargement des 
têtes. Ce signal n'existe pas sur le CPC. 
Il est activé sur ce lecteur par la ferme- 
ture du verrou. Sur d'autres, c'est l'élec- 
troniaue qui en est chargée (cas du NEC 
FD 1053). Dans ce cas, cette recette 
serait à modifier. 

Toutes les broches IMPAIRES sont reliées 
à la masse. 

La figure 3 représente l'ensemble des 
signaux du lecteur. 

Les signaux 
de communication 

Maintenant que nous avons savouré les 
hors-d'œuvre, passons à l'entrée autre- 
ment dit les signaux de communication 
entre le CPC et son deuxième lecteur, 
ainsi que les branchements. 
Avnat tout, il faut repérer sur le lecteur 
un petit cavalier métallique qui est utilisé 
pour la sélection de lecteur (A ou B). A 
la réception, celui-ci était déjà positionné 
en lecteur B. Par mesure de sécurité, véri- 
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fiez tout de même qu'il se trouve sur le 
troisième cran du support où il est enfi- 
ché. Il doit relier les broches 3 et 14 (fia. 
4-5). Si ce n'est pas le cas, il faut impé- 
rativement rectifier sa position. 
La seconde chose à effectuer est de RETI- 
RER le réseau de résistances (T-RES) qui 
se trouve sur le lecteur 5" 1 là (fig. 4-5-6) . 
Ce réseau entre en jeu dans le principe 
des portes TTL à "collecteur ouvert". En 
effet, pour permettre le branchement de 
deux lecteurs sur une même interface, les 
concepteurs font appel à un principe de 
liaison très connue appelée FONCTION 
OU. 

Sans rentrer dans le détail, ce type de 
liaison permet d'obtenir un signal à 
niveau bas en sortie si l'une des deux 
entrées possède au moins un signal à 
niveau haut. A cet effet, on place des 
résistances de charge sur chacune des 
entrées. 

Si nous laissions ce réseau sur notre lec- 
teur B, la résistance équivalente vue par 
les portes de sorties diminuerait considé- 
rablement et aurait pour effet de dégra- 
der la qualité des signaux et d'entraîner 
des problèmes de fonctionnement. 

Le cable de liaison 

Nous pouvons maintenant passer à la 
fabrication de notre câble de liaison. Il 
faudra être très méticuleux car la réus- 
site de notre recette dépend essentielle- 
ment du soin apporté à la réalisation de 
ce plat. Soyez très attentifs à la lecture 
de ce passage et respectez SCRUPU- 
LEUSEMENT les conseils qui vous sont 
donnés. Faites particulièrement attention 
aux numéros des broches à relier, c'est 
CAPITAL. Relisez plusieurs fois si néces- 
saire avant de vous lancer. Il suffit qu'un 
SEUL fil ne soif pas relier correctement 
à sa pin pour que le lecteur refuse obsti- 



nément de fonctionner. 
C'est pourquoi, dans un souci de simpli- 
fication et qui donne entière satisfaction, 
la méthode de connexion retenue est la 
suivante. 

On relie les deux connecteurs Amphénol 
(2x17 broches) entre eux par un câble 
de liaison de 34 brins. Il faut cependant 
que la PIN n° 1 du connecteur du CPC 
soif reliée à la PIN n° 34 du lecteur de 
disquettes. On constate tout de suite que 
le type de jonction entre les deux con- 
necteurs repose sur le prindpe de l'inver- 
sion (fig. 3). Il suffit maintenant de relier 
tous les autres brins en respectant ce 
principe, ce qui est facile d'autant plus 
qu'il s agit d'un câble à 34 brins. Cepen- 
dant comme vous pouvez le constater, 
les minuscules "fourches" qui établissent 
le contact avec les brins sont assez fra- 
giles. C'est pourquoi nous vous conseil- 
lons de ne pas sertir les connecteurs à 
fond tout de suite, car si le contact n'est 
pas franchement établi il faudra tout 
démonter et recommencer. Essayons plu- 
tôt d'établir un premier contact entre fils 
et fourches, de manière à pouvoir effec- 
tuer un test avant sertissage. 

Pour cela prenez une petite pince à becs 
plats, positionnez-la de manière à ce que 
chaque bec soit de part et d'autre de la 
fourche. Enfoncez le brin sur la fourche, 
suffisamment pour que celle-ci le traverse 
et qu'ainsi le contact s'établisse (fig. 7). 
Faites de même pour tous les autres 
brins. Maintenant que tout le câble est 
connecté, il nous faut, avant d'aller plus 
loin, effectuer la vérification des liaisons 
établies. Pour cela, faisons appel à un 
contrôleur universel que nous mettrons en 
position OHMMETRE, ou plus simple- 
ment, puisque vous n'êtes pos censés être 
super équipés, à une LAMPE TEST. 
Signalons à ceux d'entre vous qui n'ont 





jamais entendu parler de ces deux appa- 
reils, qu'ils sont utilisés pour vérifier si 
une liaison est correctement établie ou 
non. Comme nous l'avons dit précédem- 
ment, vous n'êtes pas forcément équipés 
et de ce fait ne possédez sans doute pas 
un OHMMETRE. Nous allons donc fabri- 
quer une LAMPE TEST "D'URGENCE", 
qui pourra vous servir pour d'autres 
montages. Alors tous à vos fers. 
Pour mieux comprendre le principe de 
fonctionnement de cette lampe, il faut 
simplement savoir qu'elle S'ALLUME 
lorsque la liaison est ETABLIE. 
Dans le cas contraire bien évidemment 
rien ne se passe. Afin de réaliser au 
mieux cet accessoire, consultez les figu- 
res 8 et 8 bis. Voici la liste du matériel 
nécessaire pour sa fabrication : 

— 1 pile de 4,5 volts type lampe de 
poche ; 

— 1 ampoule du même type (3,5 V) ; 

— 2 brins de fils isolés de 30 cm envi- 
ron (deux parmi les dix de votre nappe 
de câblage en couleur feront l'affaire). 
Commencez par dénuder les deux extré- 
mités de chaque fil, puis étamez-les. Eta- 
mez aussi les deux languettes de la pile 
ainsi que le culot de l'ampoule et son pas 
de vis. Soudez l'extrémité d'un brin sur 
une des deux languettes de la pile. Sou- 
dez ensuite sur l'autre languette le culot 
de l'ampoule. Ne la chauffez pas trop 
sinon elle risque d'éclater (d'où l'intérêt 
d'étamer avant soudure). Sur le pas de 
vis de cette ampoule, soudez une extré- 
mité du deuxième brin. Sur les deux 
autres extrémités de chaque brin, laissez 
fondre un peu plus de soudure que d'ha- 
bitude, afin qu en refroidissant elle forme 
une sorte de PIC (les pointes de touche) . 

Et voilà, la lampe est terminée. Vérifions 
son fonctionnement : mettez en contact 
les deux pointes de touche, la lampe doit 
s'allumer. Voici maintenant comment tes- 
ter vos liaisons. Il suffit de mettre une 
pointe de touche sur une broche (la 1 ) 
et l'autre sur celle qui doit être reliée 
avec (la 34). Si la liaison est correcte- 
ment réalisée, que fait la lampe ?... 
...La lampe s'allume I Bravo I Y'en a 
deux qui suivent ça fait plaisir I II ne reste 
plus qu'à passer en revue toutes les 
autres broches. ATTENTION I il est tou- 
jours bon de vérifier les broches voisines 
de part et d'autre car les petites FOUR- 
CHES utilisées sur ce genre de connec- 
teur sont assez FRAGILES et peuvent se 
plier, ce qui peut engendrer des FAUX 
CONTACTS et mettre en liaison deux 
broches contiguës (la 1 et la 3). Avez- 
vous tout bien vérifié ? Oui I En bien il 
ne reste plus qu'à sertir les connecteurs. 
Faites doucement pour ne pas plier les 
fameuses FOURCHES. Collez mainte- 
nant une étiquette sur chacun d'eux afin 
de repérer le sens de montage. Faites 
bien attention aux NUMEROS des bro- 
ches du LECTEUR et du CPC. 
Si certains d'entre vous ne trouvent pas 
de câble à 34 brins, qu'ils sachent bien 
que tout peut fonctionner en reliant les 



masses entre elles sur chaque connecteur 
et en n'utilisant qu'un seul fil pour faire 
transiter le signal d'un bout à l'autre du 
câble. 

SlDE 1 SELECT 

Et le signal SlDE 1 SELECT dans tout ça, 
me direz-vous ? A première vue, on 
pourrait penser qu'il ne faut pas le con- 
necter puisque c'est un inverseur qui per- 
mettra la sélection des têtes. En bien 
dans ce montage nous l'avons tout de 
même relié et tout s'est très bien passé. 
Il n'est donc pas utile de se compliquer 
l'existence outre mesure, car bien des 
mésaventures peuvent encore survenir 
dans ce genre ae cuisine. Donc au niveau 
du câble la liaison est établie, mais nous 
n'avons toujours pos mis l'inverseur en 
place. Au fait c'est le modèle unipolaire 
à deux positions qu'il faut prendre. Il est 
temps maintenant de s'en préoccuper. 
Pour cela il tout repérer en face avant 
du lecteur et à l'intérieur un dégagement 
pouvant recevoir notre inverseur. Ce 
n'est pas un gros problème puisqu'il en 
existe un qui est utilisé d'origine utilisons 
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le même emplacement mais côté droit. 
Prenez bien vos mesures pour ne pas 
commettre d'erreurs. Les positions sont 
sensiblement les mêmes par rapport à 
l'ouverture du passage de la disquette. 
Le perçage se fera par la face avant côté 
extérieur. Le diamètre du trou correspon- 
dra bien évidemment avec celui de votre 
inverseur. Lorsque vous aurez fini de 
jouer de la perceuse, ne le placez pas 
tout de suite, il faut avant cela souder les 
fils sur ses plots. Dans le câble en nappe 
de 10 fils de couleurs, prenez en deux, 
dénudez-les et étamez-les (toujours bien 
étamer avant de souder). Effectuez vos 
soudures puis placez votre inverseur 
sans le serrer car il faudra savoir dans 
quelle position il doit être mis pour sélec- 
tionner la bonne tête. La soudure est 
OK ? Très bien I II faut maintenant faire 
cheminer les fils au travers du lecteur 
jusqu'au connecteur. Pour plus de faci- 
lité, choisissez les emplacements déjà uti- 
lisés par les fils d'origine. N'hésitez pas 
à faire intervenir une pointe de colle 
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pourvu que cela ne soit que sur le chas- 
sis et non sur les têtes ou autre partie 
vitale du lecteur. Soudez maintenant 
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l'extrémité d'un des deux fils à la bro- 
che 32 et l'autre à la masse. 
Il faut maintenant vérifier dans quelle 
position de l'inverseur le signal est à la 
masse. Et avec quoi je vous prie ? 
Devinez I... 

...Avec la LAMPE-TEST bien sûr. On ne 
vous l'a pas fait fabriquer pour rien I 
Pour ce faire, posez une pointe de tou- 
che sur la masse et l'autre sur la broche 
32. Très bien ! Sachez donc que lorsque 
lé signal est à la masse, l'inverseur est 
basculé pour activer la tête B et si c'est 
le cas, la lampe... Qui a dit la lampe s'al- 
lume ? Bravo I II a droit à une image ! 
Il suit lui I Et vous ! vous avez trouvé ! 
Il ne vous reste plus qu'à faire deux peti- 
tes étiquettes (A et B) pour repérer la 
position de chaque tête (fig. 9). Mainte- 
nant placez convenablement votre inver- 
seur et serrez les vis de fixation. 

Le ready 

Ce signal n'est malheureusement pas 
généré par ce lecteur. Qu'à cela ne 
tienne, nous allons le fabriquer nous- 
mêmes. Mais avant tout, voyons plutôt 
comment il fonctionne. A la différence du 
signal INDEX, qui prend en charge le 
contrôle de la vitesse du lecteur, le 
READY, lui, doit indiquer si une disquette 
est présente ou non dans le lecteur. Il doit 
donc être actif quand il y en a une. La 
solution la plus simple, celle qui a été 
retenue, consiste à utiliser un micro- 
switch qui établira une liaison entre la 
broche 34 du lecteur et la masse. Il existe 
d'ailleurs une COSSE vissée sur le chas- 
sis, à l'arrière du lecteur, qui nous sera 
fort utile pour mener à bien cette opéra- 
tion. Vous utiliserez, pour établir la liai- 
son, deux autres fils de votre nappe de 
câblage. Chacune des deux extrémités 
des fils sera reliée à une broche du micro- 
switch. Mais la plupart de ces minuscu- 
les appareils possèdent trois broches 
identiques. Il faut donc savoir lesquelles 
nous devons utiliser. 
Et avec quoi peut-on le savoir ? Avec 
la ?... 

...Avec la LAMPE TEST. On vous le dit 
et on le répète LA... LAMPE... TEST I Et 



que se passe-t-il lorsque le contact est 
activé et que nous sommes sur les bons 
plots ? La lampe... 

...La lampe doit s'allumer ! Bravo I Y'en 
a quatre qui suivent, on progresse ! Lors- 
que vous les aurez repérés, ne les per- 
dez pas de vue et soudez vos fils. Ne 
soudez pas encore vos fils sur la cosse 
du châssis ni sur la broche 34 du connec- 
teur. Il est impératif avant cela de posi- 
tionner le micro-switch. 
C'est là que le tour de main du cuistot 
intervient. 

Pour cela vous aurez besoin de fabri- 
quer une petite plaque de tôle qui ser- 
vira de support (fig. 10). Percez vos 
trous un peu plus larges que les vis utili- 
sées de façon à pouvoir bouger le switch 
pour faciliter sa mise en place. Lorsque 
vous aurez installé l'ensemble, ne serrez 
pas encore les vis. Faites plusieurs essais 
avec une disquette pour trouver la bonne 
position. ATTENTION ! La disquette ne 
doit en AUCUN CAS forcer pour établir 
le contact sinon il pourrait y avoir par la 
suite des problèmes d'écriture ou bien de 
lecture. A ce propos, il est fortement con- 
seillé d'utiliser un micro-switch très sen- 
sible, ayant le moins de résistance pos- 
sible pour établir la liaison. Vous pour- 
rez le tester vous-même car le contact 
s'entend très bien à l'oreille. Lorsque 
vous aurez trouvé la bonne position, ser- 
rez les vis et refaites un essai de vérifi- 
cation. Tout est OK ? Il ne vous reste plus 
qu'à souder un des deux fils sur la cosse 
de masse et l'autre sur la broche 34. On 
met la disquette, on ferme le verrou, on 
entend le contact... Tout est parfait I 
Ouf ! Voila un gros morceau d'avalé. 
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Fig. 12 

(Implantation des composants) 



L'ALIMENTATION 

Pour réaliser une alimentation, il faut 
avant tout connaître la consommation de 
l'appareil. Pour ce lecteur, nous avons 
établi un tableau des relevés: 



mA sous 12 volts. Au moment du choix 
du transfo préférez toujours un transfo 
qui délivre plus d'intensité que moins, 
vous vous donnez ainsi une sécurité sup- 
jlémentaire. C'est ce que nous avons 
ait. Notre transfo est capable de déli- 
vrer une intensité de 1 ampère sous cha- 
que enroulement. Prenez toujours un 
modèle à deux enroulements plutôt qu'à 
un seul, vous vous éviterez des désagré- 
ments. En effet chaque enroulement ali- 



Pc 



sorti» enroulements 
transfo 


entrée régul. 12 V 


entrée régul. 5 V 


avide :14,00 V 
•n charge :13,50 V 


16,00 V 
15.00 V/750mA 


16.00 V 
15.00V/3S0mA 



En général, lorsque l'on construit une ali- 
mentation on prévoit qu'elle doit délivrer 
une intensité au moins égale à 1,2 fois 
celle consommée par le matériel lorsqu'il 
est en charge. La nôtre devra donc pou- 
voir délivrer 420 mA sous 5 volts et 900 
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mente une partie différente du circuit : le 
5 volts l'électronique de gestion et le 12 
volts la commande des moteurs. Dans le 
cas d'un transfo à un seul enroulement, 
si l'une des deux parties émet des "para- 
sites", elle les transmet automatiquement 



à l'autre partie et peut provoquer des 
défauts de fonctionnement. Dans notre 
cas cela n'est pas possible puisqu'elles 
sont séparées l'une de l'autre. De plus, 
la tension de sortie qui alimente l'appa- 
reil doit être relativement stable, c'est- 
à-dire ne pas varier de + ou - 5 % sur 
chaque sortie. Pour cela, nous faisons 
appel à un transfo 2x12 volts 26 vA. 

Normalement nous aurions dû en utiliser 
un qui délivre 1x15 V et 1x9 V. Mais ce 
moaèle est très rare et beaucoup plus 
onéreux. Rassurez-vous tout de même, 
le modèle que nous avons retenu tient 

f>arfaitement le coup, comme le montre 
es chiffres du tableau. De plus nous rap- 
pelons que cette installation fonctionne 
depuis plusieurs mois sans aucun problè- 
me. 

La mise en œuvre 

Pour réussir parfaitement ce plat nous 
vous invitons à regarder attentivement 
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les figures 1 1 et 1 2 et à bien lire les expli- 
cations. Prenez votre temps car si vous 
faites une erreur c'est la vie du lecteur 
qui est menacée. En sortie de chaque 
enroulement du transfo, plaçons un pont 
de diodes du type PBP 201 (ou équiva- 
lent). Ces ponts de diodes permettent à 
artir d'un courant alternatif d'obtenir 
e courant continu qui nous est néces- 
saire. Mais cela ne suffit pas, il faut que 
ce courant soit maintenu à la valeur dési- 
rée sans dépassement. Pour arriver à ce 
résultat nous utilisons des REGULA- 
TEURS, un 5 volts et un 12 volts. Ils 
seront placés APRES les ponts de dio- 
des, en vis-à-vis et montés verticalement. 
Ensuite vient le problème du filtrage. En 
effet, si nous pouvons obtenir un courant 
continu, il subsiste quelques petites 
"imperfections" qu'il faut absolument 
enlever. C'est le rôle des condensateurs 
2200 uF. Ils devront être placés en 
parallèle avec les ponts, mais visuelle- 
ment ils se situent dans le sens de la lon- 
gueur du circuit. Comme vous pouvez le 
voir, ils sont repérés par un signe - avec 
une flèche. Cette flèche indique la posi- 
tion du - donc la masse. Il faut donc 
faire très attention au montage et ne pas 
les inverser. Afin de vous éviter de com- 
mettre une telle erreur, nous avons 
repéré le signe + sur le circuit imprimé 
(fig. 11). 

Mais ce n'est pas tout, pour affiner le tra- 
vail accompli par les 2200 uF, il nous 
faut placer des 1 OOn F en parallèle avec 
eux. A la sortie des régulateurs, pour 
éviter des petits problèmes de "parasi- 
tes", nous allons mettre des condensa- 
teurs de 10 uF. Là encore, nous avons 
un côté négatif et un côté positif. Cette 
fois, c'est ce dernier qui est indiqué. 
Placez-les comme indiqué en figure 12. 
La résistance de 10 ohms, quant à elle, 
sera placée en SERIE entre le + du pont 
de diodes et l'entrée du régulateur 5 V. 
Elle a pour but de réduire la tension qui 
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Fig. 13 



1 1 watts. Sur le 1 2 volts cela donne : 1 6 
- 12 = 4 V. 

4x1 =4 watts. Ce qui fait nettement 
moins. Plaçons maintenant une résistance 
de 10 ohms et nous constatons que la 
tension qui arrive au régulateur 5 volts 
n'est plus que de 9 volts. Refaisons nos 
calculs : 9 - 5 = 4 volts. 4x1 = 4 watts. 
Nous avons diminué de plus de moitié la 
puissance qui passe dans notre régula- 
teur et ce n'est pas rien. Par contre la 
résistance doit pouvoir supporter cette 
puissance. Notre choix s'est donc porté 
sur une résistance qui tient les 10 watts 
(toujours la sécurité). La solution de la 
résistance est la plus simple, sachez qu'il 
existe des méthodes différentes mais plus 
compliquées à mettre en oeuvre. Il ne 
reste plus qu'à souder les fils de liaison 
entre le transfo et l'entrée de l'alimen- 
tation et ceux de la sortie de celle-ci et 
la broche à quatre plots du lecteur. Pour 
cela vous utiliserez les quatre fils qui res- 
tent de votre nappe de câblage, vous les 
couperez en deux pour en faire huit et 
vous les placerez comme indiqué sur la 
figure 1 2 et en examinant la figure 4. 



est envoyée à ce dernier et par la même 
d'éviter qu'il ne chauffe trop. En effet, 
la chaleur dégagée par un composant, 
appelée aussi PUISSANCE DISSIPEE, 
est fonction de la TENSION à laquelle 
il est soumis et de l'INTENSITE qui le tra- 
verse. En électronique il existe une for- 
mule pour calculer cette puissance : 
P = Uxl. P est la fameuse puissance, U 
la tension appliquée et I I intensité qui 
passe dans le composant. 
Dans le cas d'un régulateur, il faut faire 
la différence des tensions, pour faire 
notre calcul (U pntrée - U sortie). Si on 
se réfère au tableau, la tension qui arrive 
à notre régulateur 5 V est de 16 V. Nous 
avons donc une différence de : 16-5 = 
11 V. 

Si l'on prend comme base une intensité 
de 1 ampère, nous obtenons ; llxl = 



Il ne reste plus qu'à mettre un bouton de 
mise en service et un fusible. Le bouton 
est l'inverseur simple 1 A 250V. La liai- 
son sera faite avec le fil type lampe de 
chevet et la fiche secteur mâle (fig. 12). 
Pour placer le bouton de mise en service 
et le porte fusible, regardez la figure 16, 
nous avons prévu des trous (J,K). Pour 
le transfo ce sont les trous F et G. Le trou 
L quant à lui permet le passage du fil 
d'alimentation. Vous pouvez, si vous le 
souhaitez, utiliser un PASSE-FIL. Pour 
l'alimentation elle-même, nous avons 
choisi de l'implanter VERTICALEMENT 
afin de gagner de la place. Vous pour- 
rez, à l'aide d'une petite patte, la fixer 
sur la plaque de support représentée sur 
la figure 16 (Trou E). La figure 13 repré- 
sente l'ensemble une fois installé. La 
figure 1 4 représente le lecteur et son ali- 
mentation avant la mise sous capot. 
Maintenant que tout est monté, que nous 
-wons dégusté tous nos plats, il est temps 





A,B,C,D,E,F trous 03 

* zone à perforer à votre convenance, pour aération 



Hr. 15 



Tôle 0,5 mm 
(ou 1 mm max) 



de passer à la salade, autrement dit la 
mise en service. 

Mise en service 

Le terme de salade n'est pas vraiment 
péjoratif, car si tous les conseils que l'on 
vous a donnés n'ont pas été respectés, 
vous risquez bien de la goûter. Mais 
comme nous vous savons attentifs il ne 
doit pas y avoir dé problème. 
Tout d'abord, il nous faut préciser un 
point TRES IMPORTANT : le lecteur 
5"l/4 doit TOUJOURS être allumé LE 
PREMIER. Ensuite le moniteur, puis le 
CPC bien entendu et l'imprimante si vous 
en possédez une. 

Pour l'extinction, c'est le 5" 1 /4 qui sera 
ETEINT le DERNIER. 
Donc, allumez le 5" 1/4 SEUL. Vous 
devez l'entendre TOURNER. Allumez le 
moniteur puis le CPC. A cet instant, le 
5" 1/4 s'arrête et sa diode rouge BRILLE, 
contrairement à celle du 3" qui ne le fait 
que lorsqu'il est en lecture ou écriture. 
Ne vous inquiétez pas ceci est tout à fait 
normal. Attention ! si vous ne désirez 
travailler que sur le lecteur 3" vous êtes 
quand même obligés d'allumer votre 
5" 1 14, sinon vous ne pourrez rien faire. 
Vérifions si tout fonctionne bien. Tapez 
ùB puis RETURN. Le lecteur doit démar- 
rer et après un bref instant, le message 
Ready doit s'afficher avec au-dessous, 
le curseur. Si ce n'est pas le cas, inutile 
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d'aller plus loin car vous avez un pro- 
blème de câble ou un mauvais fonction- 
nement du micro switch. Relisez alors les 
chapitres qui en parlent. Si tout est OK, 
nous pouvons passer au dessert. 

Fonctionnement 

Si dessert il y a ce n'est pas pour autant 
que cela va être relax. Il vous faudra 
être très attentifs à ce qui suit. 
Avant de pouvoir effectuer les différen- 
tes manipulations, il faut d'abord forma- 
ter une disquette sans quoi rien n'est pos- 
sible. Pour cela, mettez dans votre lec- 
teur A le CP/M et dans le lecteur B la dis- 
quette à formater. Les possesseurs de 
6128 utiliseront le programme 
DISCKIT3 du CP/M PLUS. Nous n'allons 
pas en développer la méthode d'utilisa- 
tion, elle est clairement expliquée dans 
votre manuel aux chapitres 1 p. 40, 1 p. 
77, 5 p. 23. 

Pour ce qui est du 664 (enfant pauvre de 
chez Amstrad), c'est une autre histoire. 
Il faut d'abord formater une disquette 3" 
puis faire une copie de la face complète 
sur une 5" 1/4. C'est donc FORMAT qu'il 
faut utiliser en premier (chapitres 1 p. 40, 
5 p. 25), puis COPYDISC: (chapitres 1 
p. 75, 5 p. 22). Faites très attention aux 
touches que vous allez taper et suivez les 
instructions données par ces différents 
logiciels. Attention I À la fin du forma- 
tage, DISCKIT3 vous demande de reti- 



rer les deux disquettes pour revenir sous 
CP/M. Vous aurez beau faire, le mes- 
sage s'affichera toujours. Eh bien qu'il 
en soit ainsi I Faites tout simplement 
CTRL-SHIFT-ESC pour revenir sous 
AMSDOS. Créez maintenant une simple 
boucle pour permettre d'exécuter quel- 
ques manipulations. Pour sauvegarder 
ce programme, nous l'appellerons BOU- 
CLE, Hexiste deux méthodes : 

- soit vous tapez ùB et après avoir eu le 
message Ready vous faites : 

SAVE "BOUCLE. BAS" 

- soit vous faites directement : 
SAVE "B-.BOUCLE.BAS" 

Cette dernière solution est relativement 
intéressante, car vous n'êtes pas con- 
traints d'attendre le Ready. Donc por- 
tez votre choix sur l'une des deux solu- 
tion et allez-y. Tout se passe bien ? Par- 
fait ! Continuons. Il nous faut préciser un 
point tout de même. Si vous avez opté 
pour la première solution, à la fin de la 
sauvegarde, quand le Ready apparaît, 
vous êtes sous drive B, alors que pour la 
deuxième, vous êtes restés en A, mais 
avez envoyé la sauvegarde sur B. Cela 

f>ermet de travailler avec un utilitaire en 
ecteur A (ex. : assembleur) et de sauve- 
Sarder vos créations en B. 
ans le cas de la première méthode, 
pour revenir sous lecteur A, il vous suffit 
de taper ùA. 
Voyons maintenant comment charger les 
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programmes. Là aussi, il y a deux métho- 
des, qui sont les mêmes que tout à 
l'heure, mais il faut juste remplacer 
SAVE par LOAD. L'utilisation de RUN 
est identique. Une remarque cependant, 
il est impossible de démarrer CP/M sur 
le 5" 1/4. Il fout le foire à partir du 3" 
et sélectionner le lecteur B en tapant B: 
lorsque le sigle A> apparaît. 
Tout fonctionne parfaitement ? Très bien, 
je sens que vous jubilez. Maintenant que 
vous êtes arrivés à ce stade, vous voila 
en mesure de travailler avec deux lec- 
teurs. Vous allez en apprécier toute la 
saveur, surtout avec des logiciels comme 
MULTIPLAN ou dBASE II, car vous avez 
la possibilité de mettre le programme 
maître dans le lecteur 3" et vos données 
personnelles dans le 5" 1 /4. Cela repré- 
sente un grand confort d'utilisation. 
Si nous avons choisi d'adapter un lecteur 
5" 1/4, c'est aussi pour transférer les 
programmes qui sont en 3". Pour cela 
vous pouvez utiliser DISCKIT3 (6128) ou 
COPYDISC (664). Mais attention ces uti- 
litaires ne peuvent pas accomplir ce 
genre de travail si les programmes en 
question sont PROTEGES. Si vous dési- 
rez faire vos copies anti-café sur 5" 1 14, 
vous trouverez dans le commerce des 
logiciels prévus (entre autres) à cet effet, 
dont nous ne pouvons dire le nom, bien 
qu'ils soient en vente libre ??!! De plus 
ils contiennent assembleur désassem- 
bleur, commande de forma'aqe rapide 
(moins de 14' pour une face) et bien 
d'autres choses encore. Ils donneront à 
votre installation toute sa puissance. 
Bien ! Tout cela semble panait. Pourtant 
il y a un MAIS, car il y a toujours un 
MAIS (un peu trop souvent chez Ams- 
trad). Certains logiciels du commerce 
(jamais les vôtres) que vous aurez pas- 
sés en 5" 1/4 vont vous créer une désa- 
gréable surprise. En effet, si vous vou- 
lez les faire "tourner", vous constaterez 
qu'après le chargement du LOADER 
votre écran reste figé et que plus rien ne 
se passe. Cependant si vous observez la 
diode du 3", vous vous apercevrez 
qu'elle est ALLUMEE. C'est vrai et ça 
I est d'autant plus que le CPC envoie des 
ordres au lecteur pour charger la suite 
du programme. Eh oui I Et en plus il veut 
la charger à partir du 3". Bizarre non ? 
Un peu oui I 

Et bien plus car si vous faites un CTRL- 
SHIFT-ESC, l'écran se réinitialise mais ni 
le READY ni le curseur n'apparais- 
sent ??!! Je sens que vous commencez à 
vous inquiéter. Rassurez-vous voilà l'ex- 
plication. 

Les concepteurs du CPC ont commis, 
volontairement ou pas nous ne saurions 
le dire, une erreur. Quand vous avez 
tapé ùB, le message Ready est apparu 
et la ROM DRIVE s'est dit dans sa petite 
tête : "Tiens on travaille en drive B, 
OK I". Mais après le chargement du 
fameux LOADER, cette gentille petite 
ROM ne s'est plus rappelé sur quel drive 
on était. Intellectuel non ? Dans ce cas 
vous êtes obligés d'éteindre purement et 
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simplement le CPC et de le rallumer pour 
que l'affichage redevienne correct. Mais 
cependant rien n'est résolu ! Heureuse- 
ment, il y a une solution, car il y a sou- 
vent des solutions. En effet, un certain 
Heddy Mentalecheta, salut Heddy, qui 
a dû craquer et nous le comprenons fort 
bien, nous propose la solution miracle 
dans le CPC n 6 19 février 1987. Dans 
la pratique, c'est un peu comme cette 
célèbre pub d'appareils vidéo, un sim- 
ple petit bouton suffit. Il vous faudra tout 
de même faire un peu de "souderie". 
Mais après cela, vous pourrez sélection- 
ner enpremier drive celui qui vous con- 
vient (3" ou 5" 1/4) et démarrer CP/M 
à partir du lecteur B. 

Et qu'est ce qu'on dit ? On dit merci ! 
merci qui ? merci Heddy. 
Avant de terminer notre dessert, il nous 
reste encore quelques petites choses à 
dire. Si notre cnoix s'est porté sur un lec- 
teur 40 pistes, ce n'est pas pour rien. 
Comme vous avez pu le constater, il peut 
vous arriver des mauvaises surprises. 
Avec ce lecteur point n'est besoin de 
recharger un DOS spécial, ni d'effectuer 
des manipulations particulières. Ce qui 



vous simplifie grandement la vie quand 
vous programmez et ce n'est pas le cas 
avec tous les lecteurs 5" 1/4. 
Autre chose, si vous avez des amis qui 
possèdent un VORTEX, sachez que c'est 
un 80 pistes et que les programmes qu'ils 
vous passeront ne pourront pas tourner 
sur votre lecteur en raison de la diffé- 
rence de format, même s'ils les formatent 
en 40 PISTES. 

Elles ne seront pas identiques aux vôtres. 
Dans ce cas, utilisez vos 3" comme 
intermédiaires. 

Il ne vous reste plus qu'à mettre votre lec- 
teur sous emballage. Voyez à ce sujet les 
figures 15 et 16 qui vous y aideront. 
Voilà c'est tout, nous pouvons passer au 
salon déguster une bonne tasse de café, 
vous l'avez bien méritée. 

Fin de la recette 

Eh oui c'est l'heure de nous quitter, il ne 
vous reste plus qu'à courir chez le reven- 
deur de 5 '1/4 le plus proche et à vous 
ruer comme des bêtes sur votre merveil- 
leux lecteur. Et tout comme moi vous 
direz TANDON JE TM TANT. 

Bonne chance ! 
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Méthodes globales 



MÊ près les méthodes ponctuelles et locales, voyons 
^m en quoi consistent les méthodes globales de trai- 
^B tement de l'image. Dans le cas des méthodes ponc- 
tuelles, seule était prise en compte la valeur du point traité. 
Dans le cas des méthodes locales, les valeurs des points 
du voisinage immédiat comptaient aussi. En simplifiant, 
on peut dire que les méthodes globales tiennent compte 
des valeurs de l'ensemble des points de l'image. 
Nous avons appris que l'histogramme, en tant qu'instru- 
ment d'investigation, fournit des renseignements sur la 
répartition spatiale des niveaux de gris. La transformée 
de FOURIER qui est l'un des instruments du FILTRAGE 
FREQUENCE!., fournit des informations sur la réparti- 
tion de la transition des niveaux de gris, c'est-à-dire sur 
l'EFFET GLOBAL. 

Ce procédé ne fera pas partie des méthodes que nous uti- 
liserons pour le traitement artistique de l'image. Par ail- 
leurs, les possibilités de notre ordinateur, la taille de sa 
mémoire et le temps de calcul, ne permettraient pas de 
le faire raisonnablement. 




Citons néanmoins quelques filtres fréquenciels. 
Faisons le rapprochement avec les filtres linéaires spa- 
tiaux. Les opérateurs linéaires sont isotropes. Ayant qua- 
tre axes de symétrie, ils sont invariants par transforma- 
tion et rotation. Les filtres fréquenciels linéaires sont à 
symétrie radiale. Ils agissent identiquement sur toutes les 
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fréquences d'un même module. Ce n'est pas le cas des fil- 
tres fréquenciels non linéaires. En schématisant, on pour- 
rait dire que ces derniers agissent en équilibrant l'histo- 
gramme des fréquences. 

Plusieurs types de filtres sont utilisés : passe-bas, Butter- 
worth, exponentiel, passe-haut et la combinaison passe- 
bas/passe-haut qui donne un filtre à grand renforcement 
de contraste. 

Signalons au passage que la transformée de Fourier dis- 
crète peut être utilisée pour la compression de l'informa- 
tion concernant l'image, ce qui facilite la transmission et 
le stockage. 

Méthodes de coloration 

L'œil humain arrive à distinguer une dizaine de niveaux 
de gris, mais il peut reconnaître des milliers de nuances 
de couleurs. Si l'on remplace les niveaux de gris par les 
pseudo-couleurs, la lecture de l'image sera donc grande- 
ment facilitée. 

Le programme du listing n° 8 remplace les niveaux de gris 
codés de l'image par des couleurs. L'image-énigme a été 
créée en mode 1 . Ce mode, comme vous le savez, per- 
met l'affichage en quatre couleurs. Ceci est insuffisant, car 
notre image comporte dix niveaux de gris. Il faut donc 
créer artificiellement les couleurs manquantes. Les couleurs 
de notre écran sont obtenues par le mélange, en propor- 
tion diverse, des trois composants de base : rouge, bleu 
et vert et ceci pour chaque pixel. Nous ne pouvons pas 
employer la même méthode. Nous pouvons, par contre, 
créer des grilles ou plutôt des trames de points de diffé- 
rentes coufeurs de base. C'est le principe de l'impression 
en couleur des images (offset). Si vous avez déjà fait de 
la peinture, vous vous rappelez probablement que les trois 
couleurs primaires ne sont pas rouge, vert et bleu mais 
rouge, jaune et bleu et que le mélange de deux ou plu- 
sieurs couleurs (de base ou pas) permet d'obtenir n'im- 
porte quelle nuance. D'autre part, il n'est pas nécessaire 
de mélanger les trois composants, pour notre usage une 
trame bicolore est nettement suffisante. Ainsi le rouge 
associé au jaune donnera l'orange, le jaune associé au 
bleu, le vert, le bleu associé au rouge, violet, etc. Avec 
quatre couleurs du mode 1, on peut obtenir 
4 + 3 + 2+ 1 = 10 combinaisons. Comme par hasard, c'est 
le nombre de niveaux de gris de notre énigme. 
Comme d'habitude, le programme saisi sera sauvegardé. 
Son nom est "COULEUR". Essayez son effet sur l'image- 
énigme et sur plusieurs images traitées et dépêchez-vous, 
car à partir du chapitre prochain, plus de niveaux de gris : 
l'image binaire fera la loi. Mais rassurez-vous, l'image 
binaire ne veut pas dire noir et blanc et il est possible de 
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colorier une image binaire en fonction de la densité des 
points allumés compris dans un carré de dimensions 
choisies. 

Segmentation 

GENERALITES ^H^HHIHH 



Au tout début de notre étude nous avons examiné l'or- 
ganisation et la composition d'une image. A cette occa- 
sion, nous avons parlé des régions et des frontières. Seg- 
menter une image veut tout simplement dire PARTAGER 
celle-ci en REGIONS CONNEXES. Cette séparation en 
zones se fait en utilisant un PREDICAT D'HOMOGENEITE 
pour les tests. 
Il existe plusieurs classes de méthodes de segmentation : 



SEGMENTATION PAR PIXEL 

DETECTION DE CONTOURS 

DETECTION DE TRAITS CARACTERISTIQUES 

SEGMENTATION SEQUENTIELLE 

SEGMENTATION PAR RELAXATION OU 



ITERATIVE 

Chacune de ces classes a son utilité et le choix de la 
méthode se fait en fonction du résultat souhaité. 

SEGMENTATION PAR PIXELHHHHMHBi 

Comme son nom le dit, cette méthode ne tient compte que 
de la valeur propre du point traité. Supposons qu'une 



image représente un ou plusieurs objets sur un fond géné- 
ral. Malgré quelques ombres et reflets furtifs, les points 
du fond appartiennent à une même gamme de gris. 
Les objets, par contre, ne font certainement pas partie de 
cet ensemble, sinon ils ne seraient ni distincts ni reconnais- 
sablés. Il suffit donc de définir avec assez de précision, 
la gamme des gris de l'objet ou celle du fond. Après cela, 
un seul niveau de gris nommé NIVEAU DE SEUIL sera 
substitué à l'ensemble des niveaux de gris de l'objet. Tous 
les autres points représentant le fond auront un autre 
niveau. L'image n'aura plus que deux niveaux de gris ; 
elle sera BINARISEE par le SEUILLAGE. 
Le niveau du seuil n'est pas choisi au hasard. L'investiga- 
tion par histogramme nous fournit un renseignement pré- 
cieux : le niveau le moins représenté est celui du seuil. On 
peut dire aussi que c'est le minimum ou la VALLEE de l'his- 
togramme qui, dans ce cas, a deux maximums ou CRE- 
TES. Les points de l'une des crêtes sont les points de l'ob- 
jet et ceux de l'autre, les points du fond. Ce type d'histo- 
gramme est nommé BINODAL. 

M arrive parfois que l'histogramme présente trois crêtes 
et deux vallées. C'est le cas, par exemple, des objets pro- 
jetant leur ombre sur le fond. Dans ce cas, avant de pro- 
céder à la binarisation, on effectue en premier un DOU- 
BLE SEUILLAGE, dit DANS LES DEUX VALLEES. Les 
deux seuils correspondent qvx. gris des deux vallées. Ce 
sont des seuils des sous-images adjacentes. L'image obte- 
nue aura trois niveaux de gris. Son histogramme nous per- 
mettra de choisir le seuil de binarisation. 

Souvent, on procède en même temps au lissage et au seuil- 



AUX VRAIS PRIX DE GROS !!! 

3615 Code : CROCO vend tout à prix coûtant !! 

Le plus grand choix de logiciels pour AMSTRAD CPC, 

ATARI 520/1040 et COMPATIBLE PC à des prix 
INCROYABLES! 

Un jeu concours : des dizaines de lots dont un 

ATARI 520 STF à GAGNER !!! 

Des disquettes 3", 31/2 et 51/4 à PRIX COUTANT ! 

FAITES VITE CONNAISSANCE 
AVEC CROCO ! 

Composez 3615 code : CROCO -Vous serez gagnant ! 



loge en déterminant une moyenne spatialement, comme 
pour les filtres. Les pointes des crêtes de l'histogramme 
seront renforcées, alors que les contours des régions seront 
réduits. 

On peut aussi effectuer la GENERALISATION. La 
moyenne se fait dans ce cas à l'intérieur d'une région, ce 
qui permet d'établir un seuil valable. 
Le programme du listing n° 9 correspond au seuillage 
dans les deux vallées. Celui du listing n° 10, au seuillage 
binaire. Comme d'habitude, procédez à la saisie et 
sauvegardez-les sous les noms "SEUIL2VA" et "SEUIL- 
BIN". Les figures numéros 1 8 et 19 représentent l'image 
filtrée après le traitement par ces programmes. Les ima- 
ges obtenues par l'utilisation de l'un ou l'autre de ces deux 
programmes ne pourront plus être traitées par les pro- 
grammes que nous avons utilisés auparavant. Ceci est dû 
au fait que le niveau de gris du fond n'est plus représenté 
par un chiffre code, mais par le fond vide et ceci pour plus 
de clarté. Pour pallier cet "inconvénient" il suffit de rem- 
placer le code 32 (espace) par le 48 (chiffre zéro). 
Néanmoins, conservez la variante originale, car les pro- 
grammes qui vont suivre, afin d'accélérer le traitement, 
exigent le fond composé des espaces. 

DETECTION DES CONTOURS ^■■■■■H 

La détection des contours peut être faite de plusieurs 
manières, mais dans tous les cas, il s'agit de détecter la 
transition des niveaux de gris. Cette transition se fait au 
droit des frontières séparant les régions. Pour faire appa- 
raître le contour, il faut en premier lieu appliquer un opé- 
rateur de différenciation puis effectuer un seuillage. 
Ces opérateurs sont nombreux. Le résultat du plus simple 
opérateur est le GRADIENT. C'est la dérivée première 
de l'image. Toutes les régions homogènes seront repré- 
sentées par le niveau minimum et les contours par le niveau 
maximum. Ces valeurs correspondent au maximum des dif- 
férences trouvées pour chaque sens entre le point traité 
et ses voisins. Voici deux opérateurs de ce type : 




Dx = 



Dy = 



000; 
-1 1 
000; 

0-10 
10; 
000! 




Ces opérateurs sont utilisés par le programme du listing 
n° 1 1. D'autres définitions sont possibles : 



Dx = 


;000; 
; -1 1 : 
;000; 


Dy = 


: 0-1 0; 
;000; 
; 1 0; 


D+ = 


-1 00 
:0 1 0; 
;000; 


D- = 


10; 

-100; 

000; 



Ce sont des opérateurs de ROBERTS qui fut le premier 
à les utiliser. Les deux derniers servent pour la détection 
des bords diagonaux. 
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Citons quelques autres opérateurs. 

- Le Laplacien, correspondant à la dérivée seconde de 

l'image. Il est très sensible au bruit : 



2 ; 
D = 



10; 
; 1 -4 1 
; 1 0! 



1 Figure n° 18 
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Figure n° 19 
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Image binarisét par le seuillage. 









Figure n° 20 







CPC n° 35 - Juin 1988 



\isting 3 




800O PSEUDO COULEURS "COULEUR" >YA 

8010 ' >YB 

8020 MODE 1: HINDOU 1.22.23.25:HIND0W #1,1.40.1.23 >RC 

8025 PRINT ll.CHR$(2):CHR*(ll):CHR$(22) >6K 

8030 INPUT"non de l'image? ",n*:L0AD n$+\SCR" >UA 

8040 HINDOU 12, 22, 40. 24. 25: PRINT #2.CHR»(2);CHR$(11):CH >FB 
M(22) 

8050 LOCATE 12.2. l.-PRINT #2. "palette: ": >J6 

8060 FOR i=0 TO 3:F0R j=i TO 3:PEN l2.i:PRINT #2.CHR$( >EP 
143)::PEN #2.j:PRINT tt2.CHR*(8):CHR*(207); 
8070 NEXT j,i 

8080 FOR i=l TO 21: LOCATE l.hPRINT i. 
FOR j=l TO 4O:L0CATE 10. 1: PRINT j 
LOCATE •l.j,i:s8=ASC(C0PYCHR$(ll)):PRINT s8: 



8090 
8100 
8110 
8120 
8130 
8140 
8150 



>MA 
>E0 
>ED 
>VE 
>YC 
YD 
>YE 
>YF 



ON S8-47 GOSUB 6400.8410,8420.8430,8440.8450.84 >OB 
40,8470,8480,8490 

8310 LOCATE 11,2:PRINT sB-48: >XN 

8320 NEXT j >HE 

8330 NEXT î >HE 

8350 LOCATE ll.9.22:PEN 11,1 >VE 

8360 PRINT il," palette ordonnee:0123456789"; >YJ 

8370 FOR j=31 TO 40:L0CATE #1. j,22:s8=ASC(C0PYCHR«(il) >ZW 
) 

8380 ON S8-47 60SUB 8400.8410.8420.8430,8440.8450.846 >00 
0.8470.84B0.8490 

8390 NEXT j: LOCATE 1.23: PRINT "pas de sauvegarde!":: EN >H0 
D 

640O PEN ILOiPRINT ll.CHR«(143):RETURN >6V 

8410 PEN ll.OîPRINT ll.CHR$(143) >Y6 

8415 LOCATE #1, j.irPEN #1,3:PRINT ll,CHR$(207):RETURN >YC 

8420 PEN ll,3:PRINT ll,CHR$(143):RETURN >GA 

8430 PEN #1.1:PRINT ll,CHR«(143) >YK 

8435 LOCATE tl,j.i:PEN #1.3:PRINT #1.CHR$(207):RETURN >YE 

8440 PEN #1,1:PRINT #1,CHR$(143):RETURN >6A 

B450 PEN ll,l:PRINT #1,CHR*(143) >YH 

8455 LOCATE ll..j.i:PEN ll,2:PRINT ll.CHR$(207):RETURN >YF 

8460 PEN I1,0:PRINT ll,CHR*(143) >YH 

8465 LOCATE ll,j,i:PEN #1,1:PRINT #1,CHR*(207):RETURN >YF 

8470 PEN I1,0:PRINT ll t CHR*(143) >YN 

8475 LOCATE ll,j,i:PEN #1,2:PRINT tl.CHR$(207):RETURN >YH 

8480 PEN ll,2:PRINT ll.pHR$(143):RETURN >6F 

8490 PEN il.2:PRINT ll,CHR*(143) >YT 

8495 LOCATE tl,j,i:PEN #1,3:PRINT #1.CHR»(207):RETURN >YL 

- Opérateurs des différences moyennées : 



De PREWITT 
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: 1 o-i 

Dx=1/3x; 1 0-1 

il 0-1 



:i l l : 

Dy=l/3x ; 000 J 

-1-1-li 

De SOBEL ; 

: îo-i : 

Dx=l/4x ; 2 0-2 ! 

: 1 o-i : 
: l 2 l : 

Dy=l/4x ! 000 ; 
: -1 -2-1 ; 

- Opérateurs des différences directionnelles : 

! 10-1 ; 
HO=l/3x; 1 0-1 J 

: i o-i ; 

i 0-1 -1 ; 
Hl = l/3x; 10-0; 

i i o: 

et selon le même principe jusqu'à H7. 

De KIRSH : 

■33-5' 
HO=l/15x ; 30-5 i 
3 3-5; 



Hl = l/15x 



3 -5 -5 ; 
3 0-5 ; 

333 ! 



et selon le même principe jusqu'à H7. 

Bien entendu, l'amplitude du gradient correspond au 
maximum obtenu par l'utilisation successive des nuit mas- 
ques (HO à H7). 

Saisissez le programme du listing n" 11. Sauvegardez- 
le sous le nom "GRADIENT". Avant de l'utiliser, il faut 
préparer l'image. Elle doit comporter des zones bien 
homogènes et d'une certaine importance : l'épaisseur 
dans chaque sens doit être d'au moins trois pixels. 
Traitez d'abord l'image-énigme par le programme 
"MILIEU". Utilisez ensuite le programme "RECADRE" 
en donnant pour maxl et mini les valeurs indiquées par 
histogramme, et pour max2 et min2, 5 et 4. Après cela, 
faites tourner le programme "GRADIENT". L'ensemble 
de l'image obtenue sera rempli de "zéros", à l'excep- 
tion des contours, qui seront remplis de "neuf". La figure 
n° 20 illustre le résultat, y compris l'image où le pseudo- 
gris remplace le code. Vous remarquerez aussi que, con- 
trairement aux autres traitements, on donne aux voisins 
situés en dehors de l'image la valeur du point en cours. 

DETECTION DES TRAITS CARACTERISTIQUES 

Une fois les contours détectés, nous pouvons poursuivre 
le traitement par la recherche et l'identification des seg- 
ments, droits ou courbes des contours et l'association de 
ces éléments aux segments de référence. Ceci peut être 
fait soit dans un but d'identification des formes en vue de 
l'analyse qualitative et quantitative, soit pour permettre 
le codage et la compression des données, donc de l'image. 
Nous n utiliserons pas ce type de traitement. 
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9000 'SEUILLAGE DANS DEUX VALLEES "SEUIL2VA" 

9010 ' 

9020 MODE 1:WIND0W 1.40.23.25:HIND0NI1. 1.40. 1,22 

9030 INPUT"no« de l'image? ":n$:LOAD nt+'.SCR" 

9040 INPUT "valee l":vl:vl=vl+48 

9050 IKPUT "valee 2":v2:v2=v2+48:CLS 

9070 v3=v2-l:IF v2=vl THEN v2=vl+l:v3=vl 



FOR i=l TO 21:L0CATE 1.1:PRINT :. 
FOR i=l TO 40:L0CATE lO.llPRINT j 
L0CATEI1 , i . i : sB=ASC (C0PYCHR$ (#1 ) ) 
IF s8- vl THEN s8=32 
IF s8=32 THEN 9150 
IF s8<v2 THEN s8=vl 
IF sB >v3 THEN s8=57 
PRINT 11. CHR$(s8) 
IF s8=32 THEN 9320 
a(s8-4B)=a(s8-48)+l 



rjE'T • 



9080 
9090 
9100 
9110 
9120 
9130 
9140 
9150 
9160 
9170 
9320 

9340 

9350 MEX1 
93M 

9370 
9380 ' 

9400 CLS: SAVE" IMAGE. SCR" 
9410 MODE l:k=0 

9420 PRINT TAB( 15): "histogramme" 
9430 PRINT TAB( 15) :"«»«♦***»**" 
9440 FOR i=0 TO 9: IF a(i)>k THEN k=a(i) 
NEXT i:k=(30/k) 

FOR i=0 TO 9:PRINT i:a(i):TAB(10); 
FOR i=l TO -INT(-k*a(i)) 
PRINT CHRK143): 
NEXT kPRINT 
NEXT i 



.b.&COOO. 1.4000 



9450 
9460 
9470 
9480 
9490 
9500 
9510 END 




>YB 
>YC 

>QY 

UT 

CC 

>GG 

>H0 

>ER 

>EE 

>HV 

>RU 

Ql 

/TA 

TA 

RC 

QP 

m 

:yg 

YH 

>XC 

WH 
ZA 
ZB 

>GL 

XF 
>FV 
>YE 
/EU 
>PH 

GE 

m 

>9W 
>NZ 

>WE 
>ZD 



SEGMENTATION SEQUENTIELLE I 

Cette méthode n'est pas nommée séquentielle du fait du 
traitement d'un point après l'autre, du premier au der- 
nier, car c'est le cas de la plupart des méthodes. Ce nom 
vient du fait que le traitement d'un point tient compte du 
résultat du traitement des points précédents. C'est en quel- 
que sorte la poursuite des niveaux de gris à travers 
I image, d'où le nom TRACKING. On peut effectuer cette 
poursuite de plusieurs manières, ligne par ligne, colonne 
par colonne, par la recherche omnidirectionnelle, etc. 
Avant tout, on doit comme pour le seuillage, dans les deux 
vallées, fixer deux niveaux de seuil. L'un pour le choix 
du premier point qui sera retenu, l'autre pour les points 
de voisinage immédiat qui seront retenus même si leurs 
niveaux ne correspondent pas au premier seuil. Les deux 
seuils sont les critères de poursuite. Mais les critères ne 
sont pas obligatoirement liés au niveau de gris ; on peut 
aussi déterminer les critères directionnels, ou de contraste 
ou de forme. La segmentation séquentielle peut donc 
détecter non seulement les contours, mais aussi les régions, 
les formes, la taille, etc. Nous n'utiliserons pas ce type 
de traitement. 
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10000 'SEUIILLAGE A 2 (BINARISATION) "SEUILBIN" ;C6 

10010 ' >CH 

10020 MODE hUINDOW 1,40, 23. 25: HINDOU #1.1.40.1,22 >RW 

10030 INPUT"no«i de l'image? ":n*:L0AD n$+".SCR" >VB 

10040 INPUT "SEUIL BINAIRE": vl:vl=vl+48:CLS >N0 

10080 FOR i=l T0 21:L0CATE 1,1:PRINT i. >FM 

10090 FOR j=l T0 40:L0CATE 10.1:PRINT j FA 

10100 L0CATE» 1 . j , i : s8=ASC (C0PYCHR* ( #1 ) ) >JH 

10110 IF s8<vl THEN s8=32 TB 

10120 IF s8<>32 THEN s8=57 >UL 

10150 PRINTIl.CHRKsB) >RY 

10380 NEXT j :>CG 

10390 NEXT i >CB 

10400 CLS: SAVE" IMAGE. SCR" , b , IC000, 14000 >6H 

10510 END EB 

SEGMENTATION PAR RELAXATION OU 
ITERATIVE ^■■■■IMMHH^ 

Cette méthode de segmentation, très puissante, est basée 
sur l'ajustement itératif en fonction de l'estimation des pro- 
babilités variant à chaque passage. Elle dépasse, de loin, 
le cadre de l'initiation mais mérite néanmoins d'être citée. 



11000 ' DETECTION I 



"6RADIENT" 



DES CONTOURS 
11010 ' 

11020 MODE 1:HIND0W 1.40.23.25:WIND0W#1. 1.40. 1.22 
11030 INPUT"non de l'imaqe? ";n$:L0AD n$+".SCR" 
11040 DIM ec(22,40),a(10),b(10) 
11070 x=48:y=48:P=48 

11080 FOR i=l T0 21:L0CATE 1.1:PRINT i. 
11090 FOR j=l T0 40:L0CATE 10.1: PRINT j 
11110 IF 1=1 THEN 11170 

L0CATEIl,.j.i-l:s8=ASC(C0PYCHR«(ll)):v=s8 

IF j=l THEN 11190 

L0CATE#1 . j-1 . i : s8=ASC (COPYCHR» (Il ) ) : x=s8 

L0CATE»l.j,i:sB=ASC(C0PYCHR$(#l)):p=s8 

IF 1=1 THEN y=p 

IF j=l THEN x=p 

s8=0:x=flBS(p-x):y=ABS(p-y) 

ec(i,j)=MAX(x,y)+48:IF ec(i,j)<48 THEN ecli. 



11140 

11170 

11180 

11190 

11220 

11230 

11280 

11320 

=48 

11330 

=57 

11335 

11340 

11350 

11360 

11370 

11380 

11390 



;CH 
>CJ 

RJ 
>VC 
>WH 
>PL 
>FN 

FB 
>PD 
>TL 
>0E 
>TP 
>0R 
>PD 
>PE 
>CK 
)) >AQ 



IF ec(i. j)>48 THEN ec(i.j) >HU 



k=0:l=0:x=48:y=48:p=48 
NEXT j 

NEXT i:CLSIl 
FOR i= 1 T0 21:a*="" 
FOR )=1 T0 40:a«=a$+CHR$(ec(i,j)) 
NEXT j:PRINTIl.a»; 
NEXT i 

11400 CLS:PRINT"pas de sauvegarde" 
11510 END 



>XR 
>CD 
>M6 
RX 
>FL 
>U6 

>cc 

>KP 

>EC 



A SUIVRE 
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2 boutiques spécialisées Amstrad 
BOUTIQUE PROFESSIONNELLE 

20, rue de Montreuil 94300 VINCENNES 11) 43.28.00.71 

BOUTIQUE MICRO-FAMILIALE 
22, rue de Montreuil 94300 VINCENNES (1 ) 43.28.22.06 




Ouvert du mardi au vendred. de 1 h 30 à 1 3 h et de 1 5 h à 1 9 h - le samed. de 1 h 30 à 1 9 h - A 1 0O m du RER Vmcennes et du Métro Château de Vmcennes 



Produit! DART 
STYLO OPTIQUE : Ol loin It ■tillHf do loes. l> stylo optuue 
OART è libri optique vous permettre de réaliser de véritables chel 
fentes Fourni ivtc logicrel d'exploitation Iris compttl. 
Darse optique (disquetie) 495 F 

Qsrrlo optique (cassette) 445F 

SCANNER GRAPHIQUE : Ce scanner. 1res simple d'uliliulwn. vous 
permettra di drgrtalier louit image sur support papier, à partir 
01 la OMP 2000 Fourni avec un logicrel d'tiploitaiion iris puissant. 
OscannergraprM|ué~DART~ 790 F 



•AOltC* 4 



INTERFACE TV 
POUR AMSTRAD CPC 




mo 



FJrice è col interface te moniteur do voira Amstrad CPC vous 

servira aussi do TV 

OieéèffeceT.V. JvWtTF/ 1180F 

Cettlrfece TV. avec télécommande 1690F 

OU* 3" 3,F 

DM. 3' (par 1 0) 2 '5 F 

OéaqS~r/4(parlO) 80 F 

Ocessetlesvierjes(per 10) 80 F 



PENTEl : rartisle du minitel 

logiciel de composition graphique d'écran minitel. 

QPentel 690 F 

KENTEL: le serveur vidéotex 

Créer votre propre serveur avec messagerie. BAL. 

détecteur de sonnerie... 

DKentel 575F 

MENTEL: le minitel malin 

Gagnez du temps de connexion en accédant directe- 
ment a l'information recherchée et en la recopiant 
instantanément. 

DMentel 450 F 

D Mentel + Pentel + Kantel 990 F 




rom 



cadeau 
1 joystick 
4 logiciels 




CPC 6128 couleur + imprimante 

o 4495 F 

D CPC 464 monochrome 1990F 

D CPC 464 couleur 2990F 

D CPC 61 28 monochrome 2990F 

Savez vous que 

la gamme compatible 

IBM est à la 

portée de tous !! 

... Demandez nous 

une documentation 

complète. 



DEMANDEZ 

NOTRE CATALOGUE 

LOGICIEL 

PAR COURRIER 

joindre une enveloppe timbrée 



DIGITALISEE ARA 
Ca digitahstur vous pirmortri non seulement do digilalistr dts 
images vidéo provenant d'une caméra mais aussi dos images 
provenant directement de votre TV Un logiciel 1res complet vous 
permettra d'embellir, retoucher, stocker... tes images digriebsées 
Entièrement Irancais 
I donebeur ARA CPC 
I rkqiiekset» »R» PC 2335t 



Ceale irapriaaate AMSTRAD 

Vous permet do connecter votre AMSTRAD à n'importe quello im 

primante au standard 'cantronic*. 

Oclble imprimante CPC 150F 

Q cible imprimante PC 1 95 F 

Rallonge alimentation + vidée 

O no soyel plus collé arécten. rallonge 464 130F 

D ne soyei plus collée l'écran, rallonge 612 8 180F 

D housse pour moniteur + clavier (préciser cetil. ou monoc] 176 F 
QrubaoiraprimanleOMPI(par2| 198F 

DrubanimpnmanteOMP2000 99F 

D adaptateur pentel tous CPC 490F 



"Il ne lui manqua que la paroi 
Très performant ce synthétiseur 
votre ordinateur plus bavard qu'u 
Q synthétiseur vocal .... 
D 7 logiciels vocaui sur disquette 



ri ^flHs^VUlPflnùl donne ! 

vf cet va vous permettre de rendre 

Piy^ej jpxj a^piv"'" 



550F 
195F 




EST NE^;..^ 




• vit eue d impression de M 
30 cps en NLQ 

• entraînement friction ou traction 

• mémoire limpon de 4 K 

• interface parallèle intéflré* 

• compatihle EBSON -IPM 

• bac feuille a feuille en option 

D imprimante STAR LC1 2595 F 



I 



g 



LOGICIELS CPC 



NOUVEAUTE c 

Arcade action 1 

taanotdll 
BjUde eu nvs 
desAncJaa 
Cekl otnu (âmes 
C«t*nme BtoorJ 
ChiWhpetmrepSiwni 
ConAit ichod 
ballon II 
Oart sceptre 
Oefi au mot 



1IIT 

170 F 



B MMhM 



knpossatle Missen 2 
La marojue |iwnt 
Les tel* de l'aventure 

fcUtJaC tt* N t 

Menée Ce*wi 
rfc^HMemet 
Océan al star H 
Power ptov 

ReSei OCIDbtr St*TU 



Topten 

Tour de force 

Unir ei 

Vera« itràes bact 

Xor 





720 F 


120F 


150 F 




230 F 


1051 


110 F 




155F 


150 F 


231F 


170F 


110 F 




110F 




110 F 


120F 


léOF 


11SF 


199 F 




150 F 


110F 


160 F 


211 F 


210 F 




215 F 




115F 




175F 


125F 


115 F 


125F 


175F 


120F 


115 F 




2IOr 


15 F 


170F 


130F 


lié F 




150 F 




IIOF 




155 F 


145 F 


115 F 



JEUX 

BejMae 

Brayll 



tOOF 
140F 
105 F 
145F 



135F 



Bubt* 6hoil 

Ouaberry ne Spectre 

Crash Garell 

CiaiyCai 

Elite 

FI5Str»eE»gre 115F 

Gryior 100 F 

Han distende 




■M hem 
Turtofh te Rôdeur 
2eea 



145F 
189 F 
180 F 

110 F 

111 F 
230 F 
115F 
115F 
110 F 
145 F 
240 F 
III I 

2»r 

131F 
210F 
720 I 
110 F 
145 F 
115 F 
M> 
1151 
155F 
155F 
IIOF 
110 F 
155 F 
175F 
III F 
210 F 
145 F 



COMPILATION c 




•JbumUt» 
Amstrad GoM Hits II 
A/cedoAcnon 
Best ol Et» Vol I 
8ettol Elle Vol. 2 
B)4 

Caoel'DWarl 

CoMKlnn 
Ci 

mm i 

H«3 



1IIF 

115F 
115F 



115 F 



D*arl*tjeJ 



■Se 



Slar Gaines 
s sel el Match 
GasolHits 

Géants d'Aï 





lesprirés 

Modteun eu monde 

Pack ol aces 

Pack Un N 1 

Progmei de sport 

PubGomes 

Taux* • Xevwn • Soc 115F 

Trésors d'U S yCèd 110 F 



ETERNEL 

30 Giand prit 

Anjti ol Roma 

Bivouac 

Cobssus Chass 4 

Oeac rival ors 

OtopSrt*. 

EXIt 

For et Flemrrwi 

Fymg Shark ^^mw 

e^ri^^ae 

ttattru .-ir i-i 
(jade r h . ■ 
Grs JF 




HIIRise 
Moord Sport 
te Complot dINun 
r*crg Sciabo» 



Patatrm 

ProtJey 

Schokmy Raser 

Saraukn 115 F 

Shogun 

Soma7 

Skaal 

ThaiBotng 

Ir»Er3c*jn 



lui F 


INF 


IIOF 


160F 


INF 


145 F 


100F 


145 F 


150 F 


110 F 


100F 


155 F 


120F 


110 F 


105F 


110 F 


100 F 


155 F 


125F 


155F 


230 F 


215 F 


110F 


110 F 


215 F 


215 F 


105F 


155 F 


120F 


110F 


101F 


145 F 


115 F 




120F 


115 F 


110F 


150F 


145F 


III F 


100F 


150 F 


105 F 


150 F 



EDUCATIF 
lajoi i k I Hraajrji 
Apprends moi a écrire 
Apprends moi S kre 

Fronçais roussie 4C 
franc ao réussite 6E 
rjrajniaiejra bénf Iran 

ftston 5E 
les voleurs du temps 
Maths 3 laigéort 3-1 
Maths 6 UBjtÉrs 6-J 
Maths second cyde 2 
Mathi succès 5' 
Maths succès 6' 
Obérer,! Europe 4- 3* 
Oterctil Franc, è» 
Sacèdos 

UTILITAIRE 

BMrae2lll 

Budget I errata! 

Descelofi 

Grapho 

loto 

Maslercak 

Masiorfèe 

Mm : | re 



Super ip,t* 

Tascoey 
Tes word 

Vecnm 30 



175F 
170F 
170F 



150 F 
IIOF 



145 F 
200 F 
210 F 



200 F 

m F 

210 F 
150F 
150 F 
210F 
220 F 
2501 
III F 
200 F 
200 F 
150F 
150 F 
115 F 
115 F 
215 F 

D 
450 F 
III F 
350 F 
211 F 
115 F 
350 F 
310 F 
350 F 
330 F 
115 F 
250 F 
310 F 
410 F 



CREDIT Crédit immédiat pour tout achat supérieur à 1 500 F Carte de crédit Autote et Pluriel bienvenues 



COMMENT COMMANDER :Cocher lois) •nscteXi) désiréls) ou laites une liste set teintée è pari Faites le letel + Irais de port (20 F peur achats inférieurs è 500 F. 40 F de 500 è 1000 F. 60 F de 1000 F è 2000 F. 60 F pour achat supérieur â 2000 F) 
NOM ORDINATEUR- QPC1S12 GIIZIcmI. M612lmoao O 464 coel 464 mono 1256 1512 

ADRESSE - TÉI CODE POSTAL VILLE 

Mode de paiement : D chèque / □ mandat / D contre-remboursement (prévoir 20 F de frais) - envoyer le tout à : ORDIVIDUEL. 20,ruerJeMontreuil94300VINCFNNES. 

CB N de carte Oate de validité . Signoture 
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ROGRAMMATION 



AVANCEE 



DETAIL 
D'UN OBJET- 
PLAN TROIS 
VUES 



CAO 



SUR 



MICRO 



CPC 



16ème PARTIE 



Jean-Pierre PETIT 





ean-Pierre PETIT est directeur de recherche au CNRS. Il est l'auteur d'un logiciel de CAO de 

120 Ko Intitulé AMSTRAD 3D, assorti d'un livre du même nom, édité par PSI. Le logiciel a été 

délibérément mis dans le domaine public, c'est-à-dire que vous pouvez le copier sur une 

disquette AMSTRAD CPC en toute tranquillité chez un revendeur ou un ami. 

Ce livre est un gros mode d'emploi du logiciel pour non programmeur. 

Mais ce programme est riche de ficelles de programmation, liées à l'imagerie 3D. 

Dans cette suite d'articles, Jean-Pierre PETIT explique au lecteur toutes ses astuces, ce qui 

lui permettra de construire lui-même son propre programme de CAO. 



INTRODUCTION 



Au point où nous en sommes, si vous avez 
la curiosité de comparer d'un côté l'en- 
semble modeleur (MOD1 + MOD2) et de 
l'autre la partie synthèse d'images (DES 
+ VOIR), vous verrez que cette première 
partie est trois fois et demie plus impor- 
tante que la seconde. Toute la richesse 
d'un logiciel de CAO est dans le mode- 
leur. 



Aujourd'hui nous allons nous doter 
de sous-programmes permettant 
de détailler un objet et de fabri- 
quer à l'écran un plan trois vues d'un objet 
ou d'un bloc et d'en tirer éventuellement 
des hardcopies. Comme toujours le lec- 
teur néophyte pourra manipuler cet en- 
semble de manière autonome. Il pourra 
être adjoint à ce qui a déjà été donné à 
l'aide d'un ordre MERGE. 
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DETAILLER UN OBJET 

Avec le mini modeleur MOD1 dont le lis- 
ting est donné, vous pourrez créer un objet 
constitué de chaînes, ou charger un ob- 
jet créé précédemment. Supposons que 
vous souhaitiez examiner cet objet, chaîne 
par chaîne, point par point. L'option 
I - Examiner un objet 
répondra à cette demande. Ce sous-pro- 



REMARQUE 

Certains lecteurs semblent avoir eu 
des difficultés à se procurer la dis- 
quette AMSTRAD-3D. En plein ac- 
cord avec l'éditeur, vous pouvez, le 
cas échéant, adresser une disquet- 
te AMSTRAD vierge à l'auteur avec 
50 F pour le port, ou plus simplement 
90 F sans la disquette à l'adresse 
suivante : 

Jean-Pierre PETIT, Chemin de la 
Montagnère, 84120 Pertuis, Vauclu- 



gramme sera présent dans MOD1 et dé- 
butera à l'adresse 10000. Cette section 
est d'une lecture très évidente. On de- 
mande à l'utilisateur, chemin faisant, s'il 
souhaite ou non sortir ces données sur 
imprimante. La suite est triviale. 
L'ordinateur affiche les coordonnées 
(GX.GY.GZ) du centre de gravité de la 
constellation de points constituant l'objet 
ainsi que RE, rayon de sa sphère 
d'encombrement. Ces renseignements 



Signalons que nous pouvons désormais 
vous fournir une version tournant sur 464 
avec lecteur externe, ceci grâce aux modi- 
fications apportées. En effet CHAIN ne mar- 
che pas dans le 464. Il a donc fallu le sim- 
uler en stockant et en rechargeant les fi- 
chiers résidents à chaque transfert. Par 
ailleurs il y a quelques différences dans 
les syntaxes respectives (effaçage fichiers, 
basculement de pages-écrans). Problème 
résolu grâce à l'obligeance de monsieur 
Vibert, de Garches. Remarque : nous 
n'avons pas de version sur 664 disponible. 
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Datai 1 de l'objet DODECA 

Nombre de chaînes 12 
Centre de gravite : 
GX- 
6Y- 
GZ« 
RE- 1 




Chaîne numéro 1 > 



XT- 
XT« 
XT- 
XT> 
XT= 



303 
303 
187 
491 
794 



XT = -' I. 



YT- 0.934 
YT- 0.934 
YT« 0.377 
YT- 0.356 
YT» 0.377 
YT- 0.934 



Chaîne numéro 



XT 
XT: 
XT 
XT 



0.794 
0.982 
0.607 
O. 187 
XT- 0.303 
XT- 0.794 



YT- 0.577 
YT- O 
YT- 
YT- 0.377 
YT= 0.934 
YT- 0.377 



Chaîne numéro 3 > 



XT- 0.794 
XT- 0.303 
XT- 0. 187 
XT- 0.607 
XT- 0.982 
XT- 0.794 



YT— 0.377 
YT— 0.934 
YT— 0.377 
YT- O 
YT- O 
YI— 0.377 



Chaîne numéro 4 



XI— 0.303 
XT— 0.794 
XT— 0.491 
XT = O. 187 
XT- 0.303 
XT—0.303 



YT— 0.934 
YT— 0.577 
Y 1— 0.33b 
YT— 0.577 
YT— 0.934 
YT— 0.934 



. p 


oints 




-0 


187 


ZT- 





187 


ZT» 


0. 


794 


ZT = 





794 


ZT» 


0. 


187 


ZT- 


-o 


188 


Poi nts 


ZT- 


-0 


187 


ZT- 


0. 


187 


ZT- 


0. 


794 


ZT- 


0. 


794 


ZT= 





187 


ZT— 


-0. 


188 


Points 


ZT— 


-0. 


187 


ZT- 





187 


ZT- 


0. 


794 


ZT» 


0. 


794 


ZT = 


0. 


187 


ZT- 


- .:■ . 


188 


Poir 


ts 


ZT- 


-0. 


187 


Zl- 


0. 


187 


ZT- 


0. 


794 


ZT- 


0. 


794 


ZT» 


0. 


187 


ZT — 


-0. 


188 



Chaîne numéro 5 






XT— 0.982 
XT— 0.794 
XT— 0.491 
XT— 0.491 
XT— 0.794 
XT— 0.982 



YT» O 
YT- O. 
YT» 0. 
YT— 0. 
YT— 0. 
YT- 



Chaîne numéro 6' 



377 
356 
356 
577 



> 



XT- 0.607 
XT» O. 187 
XT— 0.491 
XT— 0.491 
XT- 0. 187 
XT- 0.607 

Chai ne numéro 



YT- 
YT» 0.577 
YT» 0.356 
YT— 0.356 
YT— 0.577 
YT» O 



XT— 0. 
XT— O, 
XT» O. 
XT- O. 
XT— O. 
XT— O. 



607 
187 
491 
491 
187 
607 



YT- O 
YT— 0. 
YT— O. 
YT» O. 
YT- 0. 
YT- O 



Chaîne numéro 8 



XT- 0.982 
XT» 0.794 
XT» 0.491 
XT» 0.491 
XT» 0.794 
XT- 0.982 



YT- 
YT» 
YT- 
YT- 
YT- 
YT- 



577 
356 
356 
577 



577 
356 
336 
577 



Points 


ZT — 


-0. 


187 


ZT» 





187 


ZT» 


0. 


794 


ZT- 


0. 


794 


ZT- 


0. 


187 


ZT = - 


■0. 


188 


Poi nts 


ZT» 





794 


ZT- 





794 


ZT- 





794 


ZT- 





794 


ZT- 





794 


ZT- 





794 


> Points 


ZT» 





794 


ZT = 


-0 


794 


ZT- 


-o 


794 


ZT» 


-0 


794 


ZT— 


-o. 


794 


ZT= 


-0 


794 


Points 


ZT- 





187 


ZT— 


-o 


187 


ZT- 


-0 


794 


ZT— 


-0. 


794 


ZT- 


-0 


187 


ZT» 


0. 


188 



Chai ne numéro 9 



XT» 0.303 
XT- 0.794 
XT- 0.491 
XT— 0. 187 
XT—0.303 
XT» 0.303 



YT- 
YT» 
YT» 
YT» 
YT» 
YT- 



0.934 
0.577 
0.356 
0.577 
0.934 
0.934 



Chaîne numéro 10 



XT— 0.794 
XT—0.303 
XT— 0. 187 
XT— 0.607 
XT— 0.982 
XT--0.794 



YT» 
YT- 
YT- 
YT- 
YT- 
YT» 



577 
934 
577 



Chaîne numéro 11 



XT — 0.794 
XT— 0.982 
XT— 0.607 
XT— O. 187 
XT— 0.303 
XT— 0.794 



YT--0.577 
YT» O 
YT» O 
YT— 0.577 
YT— 0.934 
YT— 0.577 



Chaîne numéro 12 



XT» 0.303 
XT—0.303 
XT— 0. 187 
XT- 0.491 
XT- 0.794 
XT- 0.303 



.934 
.934 



Yl— 0. 
YI— 0. 
YT— 0.577 
Y 1—0.356 
YT— 0.577 
YT— 0.934 



6 Points 

ZT- O. 187 
ZT— 0. 187 
ZT— 0.794 
ZT— 0.794 
ZT— 0. 187 
ZT- 0. 188 

6 Points 



187 
187 



ZT- 
ZT— O 
ZT— 0.794 
ZT— 0.794 
Z 1—0 
ZT= 



. 187 
188 



6 Points 

ZT» O. 187 
ZT— O. 187 
ZT— 0.794 
ZT— 0.794 
ZT— O. 187 
Zl- O. 188 

6 Points 

Zl- O. 187 
Zl— O. 187 
ZT— 0.794 
0. /V4 
ZT— 0. 187 
ZT- O. 188 




Fig. 2 Objet DODECA projeté sur le plan XOY 
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Fig. 3 Objet DODECA projeté sur le plan YOZ 
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Fig.4 
Objet DODECA projeté sur le plan XOZ 



peuvent d'ailleurs être considérés comme 
suffisants. Sinon, on voit apparaître suc- 
cessivement les ensembles de 
coordonnées (XT, YT, ZT) des points de 
chaque chaîne. 

Ceci sera pour nous l'occasion de don- 
ner les coordonnées d'un polyèdre régulier 
appelé dodécaèdre. Vous en avez sûre- 
ment déjà vu sur les trottoirs des gran- 
des villes, sous forme de containers desti- 
nés à recevoir les bouteilles vides. Ce po- 
lyèdre est constitué de 12 (dodéca veut 
dire douze en grec) pentagones réguliers. 
Déterminer les coordonnées précises des 
sommets est une opération de géométrie 
3D assez pénible. Le tableau ci-après cor- 
respond à ce qui sortira de votre ordinateur 
si vous activez ce sous-programme d'exa- 
men de l'objet DODECA chaîne par chaî- 




ne et vous pourrez, inversement, vous 
servir de ce tableau pour créer cet objet 
chaîne par chaîne, toujours à l'aide de 
MOD1 (option a-Créer un objet, sous op- 




Fig.S 
La fusée sur son pas de tir 



Fig.6 
Le second et le troisième étage 

• 

tion a-Créer chaîne par chaîne etc.). 
Voici la séquence d'examen de l'objet DO- 
DECA : 

i - Examiner un objet 

DETAIL D'UN OBJET 

Nom de l'objet à charger ? DODECA 

Sortie imprimante ? N 

Centre de gravité : 

GX-0 

GY-0 

GZ-1 




Fig.7 
Le premier étage 
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On examine les chaînes ? 

La machine affiche alors la séquence des 
coordonnées des points, chaîne par chaî- 
ne. Le tableau ci-après correspond à une 
sortie imprimante. 

Coordonnées des points chaînés de 
l'objet DODECA 

PLAN TR^ÏS VUES 

Nous allons loger la partie réalisant le plan 
trois vues dans la section programme 
DES. Nous verrons d'ailleurs pourquoi 
dans une leçon ultérieure. En effet, las 
de fournir à l'ordinateur les valeurs numé- 
riques des coordonnées de la position de 
l'observateur et du point visé, nous vou- 
drons un jour faire du "tout à l'écran". Ces 
positions seront acquises par la machine, 
à l'écran, avec la "croix de saisie" dont 
nous avons expliqué le fonctionnement 
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dans une leçon ultérieure. Mais le dépla- 
cement de cette croix de saisie, à l'aide 
des touches fléchées, ne pourra se faire 
que vis-à-vis d'un décor, qui ne sera autre 
que le plan trois vues. D'où le double inté- 
rêt de cette section. 

Le plan trois vues lui-même n'est pas un 
problème. A priori, cette image est beau- 
coup plus simple à réaliser qu'une vue 
en perspective. Mais encore faut-il, pour 
un objet ou un bloc, que l'ensemble se 
cadre bien dans l'écran. Il faudra donc 
passer par un calcul du centre de gravité 
de l'ensemble et du rayon de sa sphère 
d'encombrement. 

Un objet ou un bloc est un ensemble de 
points chaînés, de coordonnées XT(I, J), 
YT(I, J), ZT(I. J). Il faudra calculer le centre 
de gravité de cet ensemble de points, ce 
qu'on obtient à travers les formules : 
abscisse du CG = (somme des coordon- 
nées XT(I, J)/nombre de points 
ordonnée du CG = (somme des coordon- 
nées YT(I, J)/nombre de points 
Cote du CG - (somme des coordonnées 
ZT(I, J)/nombre de points 
Le rayon d'encombrement sera obtenu 
en faisant un tri visant à déterminer le 
point le plus éloigné du centre de gravité. 



KL 



Proj.sur XOZ 



J l I I l 




J I I L 



fig.8 

Projection du bloc sur le plan XOZ 



Commentaire : 

L'option m-Plan trois vues envoie au 
sous-programme 34000. Nous allons uti- 
liser ici plusieurs gadgets. Primo, l'ins- 
truction Cp/m ISCREENCOPY nous per- 



mettra, après création en page 1 des pro- 
jections de l'objet ou du bloc selon les 
trois plans XOY, XOZ, YOZ, de stocker 
ces vues dans les pages 2,3,4. Ainsi cette 
partie ne peut fonctionner que sur une 
machine ayant 128 K. Par ailleurs le lec- 




COMPILATION 



1 



CPC 



œm/noN des 

t-î-3-4 



Souvent réclamées, voici les compilations de CPC. Vous 
y trouverez les listings des anciens numéros ainsi que cer- 



CPC 

COMPILATION 

des revues numéro 

5-6-7-8 



sauco* 



tains articles de fond. 
A posséder absolument ! 






•X 




Compilation 1 
, (n° 1 à 4) 80 F 

• D Compilation 2 

• (n° S à 8) 80 F 
Frais de port 10% 



• 
• Nom : 


• Prénom • 


• 
• 


• 


V 

• Code Postal : 


' VilU ■ 



Date 



sn&mi 



.Signature 



La Haie de Pan 
35170 BRUZ 



Merci d'écrire en majuscules. 
Ci-joint un chèque libellé à l'ordre 
des Editions SORACOM. 



V^W%ï*AV 




teur doit savoir que la gestion de pages 
écran ne peut se taire que si on a fait 
s'exécuter préalablement une routine pré- 
sente sur la disquette système et intitulée 
BANKMAN. C'est cette routine qui pré- 
cisément crée l'instruction SCREEN- 
COPY, qui autrement n'est pas reconnue 
par l'ordinateur. Tout ceci a été détaillé 
dans les leçons précédentes et nous n'y 
reviendrons pas. Précisons quand même 
pour le néophyte que l'ensemble MO01 
+ DES, utilisé pour la création d'un plan 
trois vues ne pourra fonctionner que si 
on est entré dans la chaîne de traitement 
par la séquence : 

RUN 'BANKMAN (présents sur la disquet- 
te système Cp/nrr) 
RUN"MOD1 

Le plan trois vues sera réalisé dans deux 
cas : objet unique (CD - 1 ) ou ensemble 
d'objets (CD - 2 ) éventuellement réunis 
dans un bloc (CD ■ 3). Le registre CD 
mémorise donc le choix de l'utilisateur. 
Des tests effectués sur CD permettront 
d'étendre ou non les procédures à l'objet 
unique ou à l'ensemble d'objets, classique- 
ment repérés par l'indice K. 
Quand nous avons créé DES, nous nous 
sommes arrangés pour que l'ordinateur, 
lorsqu'il crée des images, effectue dans 
la foulée le chargement des coordonnées, 
dans le sous-programme 5000, et la créa- 
tion du point objet, de coordonnées écran 
XE, YE, par appel à la routine 15000 
(absente dans le listing ici présent). Un 
f lag FI intervient alors comme flag de non 
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Fig. lO 
Projection du bloc sur le plan YOZ 



traçage, dans la ligne 34080. Cette ligne 
est à l'intérieur d'une boucle d'indice K 
et le flag désactivera dans l'appel du sous- 
programme 5000 la partie constitution de 
l'image en perspective. 

Dans la boucle 34070-341 20, on calcule 
les coordonnées XG, YG, ZG qui se réfé- 
rera ici au centre de gravité du bloc. S'il 
s'agit d'un objet unique, ce centre de gra- 
vité GX(K), GY(K), GZ(K) est automatique- 
ment calculé dans la routine 44000, de 
même que le rayon de la sphère d'encom- 
brement RE(K). 

La seconde boucle 341 40-341 70 calcule 
le rayon de la sphère d'encombrement 
du bloc. La méthode est simple. Après 
avoir initialisé le registre R à zéro en fin 
de ligne 34130, on calcule pour tous les 
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points la distance RR du point au centre 
de gravité. Le test 341 60 permet de sélec- 
tionner la valeur la plus grande. Il est alors 
évident que la sphère centrée au centre 
de gravité du bloc et de rayon R contient 
tous les autres points. 

On procède alors au tracé des axes, en 
couleur 3 (le rouge, si vous n'avez pas 
sélectionné de couleur particulière). L'objet 
est tracé en couleur 1 (jaune, sauf sélec- 
tion). En 34360, on demande si l'utilisateur 
veut réaliser une hardcopy sur imprimante. 
Si la réponse est oui l'ordre CALL &A000 
active cette recopie d'écran. Un program- 
me de recopie a été donné dans une leçon 
précédente, tournant sur DMP 2000. Si 
vous en disposez, rappelez-vous que pour 
fonctionner correctement, vous devrez 
avoir procédé comme suit : 

RUN"BANKMAN 

RUN"DMP2000 

RUN'MODI 

A partir de 34370, on crée les deux vues 
suivantes. La ligne 34710 est une saisie 
de caractère. Si ce caractère est un "x" 
minuscule ou majuscule, le programme 
47000 réalisera une permutation circu- 
laire des vues, à l'écran. Toute touche 
autre que "x" ou "X" provoquera la sortie 
de ce sous-programme. 
La création d'un plan trois vues de bloc 
ne posera a priori pas de difficulté. Les 
figures ci-après donnent un exemple 
d'un travail de ce genre, exploitant les 
routines déjà présentées dans les 
leçons précédentes. 
Le plan trois vues illustre l'éternel limita- 
tion de cette CAO sur micro : la résolution 
écranA 
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DES 



1 REM DES! 15 29 avril 98 

2 IF FD=1 THEN 230: * 
5 SOUND 1.20: CLS:PRINT"Pas d'accès direct a DES":PRINT 
:PRINT"Je vous renvois sur M0Dl...":RUN"«odl#15 

10 CLS: '* 

15 PRINPMENU PRINCIPAL":PRÎNT: « 

20 FRINT"a-Creer un objet": '♦ 

30 PRINT"b-Co*pleter un obiet": ♦ 

40 PRINTc-Stocker un ob;et": ♦ 

50 FfllNF'd-Charqer un objet":'* 

60 PRINT"e-Gestion de blocs d'objets":PRINT"f-6estion d 

u cataloque":PRINT"q-ManiPuler objet ou bloc":PRINT"h-F 

usions diverses":PRINT"i-":PF!lNT"j-Fichier objets stand 

ards":PRINT"k-voir" 

70 PRINT "1-Creer une inaqe": '♦ 

80 PRINT'n-Plan trois vues":PRINT"n-":PRINT"o-":PRINT"p 

-":'* 

180 PRINT"q-Quitter': * 

195 IF EL» <] "" THEN L0CATE 22.21:PP.:NT"0b.iet résident 

":L0CATE 22.23:PRÎNT EL»:'* 

197 IF LO-1 THEN L0CATE 31.23:PRINT L+l:" ch.": » 

198 L0CATE 1.22:'» 

200 G0SUB 65000: REM Saisie caractère ♦ 

205 IF C =11 THEN CHAIN"V0IR#15": ♦ 

210 IF C=17 THEN END:'* 

220 IF C<1 0F; CM 7 THEN 10: '* 

225 IF C = 16 THEN G0SUB 17000:G0T0 10: '* 

230 ON C GOSUB 64000.64000. 64000,5000.64000. 64000,6300 

0. 63000 . 60000 . o4000. 60000 . 27000 . 34000 

240 !ERA."*.BAh":'* 

999 GOTO 10 

5000 REM Chargement objet * 

5001 FI=1 : REM FLA6 de non trace * 

5010 INPuT'Noffl de l'objet a charqer":&*(K):EL*=EL*(K): 
'* 

5020 OPENIN EL*(K!: » 

5025 INPUT#9.C0(K).GX(K).GY(k),GZ(K),RE(K).L:REM L'obje 

t a (L+l) chaînes * 

5030 FOR 1=0 TO L : REM Pour toutes les chaines allant 

de a L * 

5040 INPUT #9. NU): REM Nombre de seqments sur chaîne * 



OH 

M) 

>PM 

>UG 

>cw 

>BN 

>HX 

EH 

ES 

>FP 



>DS 
>PF 

>VM 
>MK 

QZ 
FE 
■FY 
■K 
>NX 
>TV 
•DX 
>UD 

MD 
;UE 
>VZ 
>ZM 
>JE 

;>nb 

>VH 
>E0 
>YY 



5050 FOR J=0 TO N ( I ) : REM Pour tous les points de la 


cha >CN 


ine d'indice I * 




5060 INPUT #9.XT(I.J),YT(I,J),ZT(I,J):'* 


>6Z 


5065 IF FI=0 THEN GOSUB 15000:REM Tracer* 


>HD 


5070 NEXT J:NEXT I:'* 


>NU 


5080 CLOSEIN: '* 


>VE 


5999 RETURN:'* 


>QF 


7000 REM CALCUL PARAMETRES VISION * 


>DD 


7999 RETURN : '* 


>QK 


10000 REM dessin par bloc * 


>IK 


10999 RETURN:'* '. 


>XB 


11000 REM DESSIN PAR ELEMENTS * 


ZL 


11999 RETURN : '* 


>XD 


12000 REM Objet déjà présent en mémoire 


>HD 


12999 RETURN 


>PC 
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15000 REM Calcul et trace imaqe * 

15999 RETURN: '* 

18(i00 REM Acquisition éléments * 

18010 INPUT"Nombre d'éléments ";E:E=E-1: '* 

18020 FOR K=0 TO E:PRINT"Element numéro ":k+l:INPUT EL» 

IkhNEXT K: '♦ 

18999 RETURN: '* 
"23000 REM TRACE QUADRILLAGE XOY 

23010 MOVE 300-!00*X60/R.O:DRAN 3C0-100*XG0/R.399.3,0:M 

OVE 0.200-100*YGO/R:DRAW 639.200-100*YG0/R,3.0 

23020 FOR Û=-5 TO 5 

JO MOVE 300-100*(XGO-0)/R.200-100*Y60/R,3:DRAW 300-1 

C<-# ( XGO-Q ) /R . 2 1 0- 1 OO*YG0 /R . 3 , 

23040 NEXT 

23050 FOR 0=-5 TO 5 

23060 MOVE 300-100*XGO/R, 200-100* (Y 

OO+XGO/R, 200-100* (YGO-Q) /R. 3.0 

'■ NEXT 
.23999 RETURN 

27000 REM REPRESENTER UN OBJET « 

27999 RETURN: »/Ak 

28000 REM CHARGfiflirJmjIER BLOC 
28010 INPUT"NDBKtlfbïcH^BL» 
28015 'ON ERROWsjfcy-fcffi 
28020 OPENIN Bl 
28030 INPUT 19 
28040 FOR 1=0 
28050 INPUT * 
28060 INPUT #9 
28070 INPUT 
28080 INPUT 
28090 INPUT 19 
28100 INPUT i 
28110 NEXT k 
28120 CLOSEIN 
28999 RETURN 
30000 'OBJET 

30002 IF LO-1 Lkj EJL»=J"lTAi PRINT 
sent en mei7toire":Pfi IN7îPRINT"Qn,ga*|de 
F C=15 ïï€N30JbK^siTT\ ^ 
30ptty-^îr^ll^ElïPRINT"Qi»7*>t n 
:?RINT"0n garde "':G0SU8 65020 
3C*320 IF EL$0""'"ftljfl5l»HEN 30999 



ZJ 
>XG 
•BB 

QY 
•VU 

>XK 
>AX 

:.-nw 

tfi 

>NG 






"Bloc résident 



3O0S0 GOSUB 5000 

3099? RETURN 

310OÎJ REM BLOC EN MEMOIRE ? 

31010'JF BL* <>"' THEN PRINT 

"On qaWe ?":60SUB 65020 

31030 IF. BLiO'^AjNJL 

31040 PRINTi€OSUB 2B000 
^31999 RETURN 
1 32000 REM SAISIE ECRAN 

32010 MOVE 300-100*Y60/R,0:DRAN 30O-100*Y6O/R,399,3,0:M 

OVE 0,200-100*ZGO/R:DRAM 639,200-100*ZGO/R,3,0 

32020 FOR 0=-5 TO 5 

32030 MOVE 300-100* (YGO-Q) /R.200-100*ZG0/R. 3,0: DRAW 300 

-10O*(Y6O-Q)/R,210-10O*ZGO/R,3,0 



>A6 
>RX 
>PD 
>RA 
>NA 

>L6 

>RH 
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32040 NEXT >CA II 

32050 FOR Q=-5 TO 5 >LK 

32060 MOVE 300-100«YGO/R,200-100»(ZGO-Q)/R,3,0:DRAW 310 >RZ 

-100*Y60/R,200-100«(Z60-Q)/R,3,0 

32070 NEXT >CD 

32999 RETURN >PE 

33000 REM TRACE QUADRILLAGE XOZ >AZ 
33010 MOVE 300-100«X60/R,0:DRAN 3O0-10O«XG0/R,399,3,0:H >NZ 
OVE 0,2OO-10O«ZBO/R:DRAW 639,200-100*ZGO/R,3,0 

33020 FOR 9=-5 TO 5 >LH 

33030 «OVE 300-100»(X60-Q)/R,200-100iZGO/R,3,0:DRA« 300 >RV 

-100*<XGO-Q)/R,210-100»ZGO/R,3,0 

33040 NEXT >CB 

33050 FOR 0=-5 TO 5 >LL 

33060 MOVE 300-10O«XGO/R,200-100«(ZGO-Q)/R,3,0:DRAW 310 >RY 

-100«XB0/R, 200-100* ( ZGO-0) /R, 3, 

33070 NEXT >CE 

33999 RETURN >Pf 

34000 REM SITUER DECOR >RP 
34010 CLS > F D 
34020 PRINT n PLAN TROIS VUES":PRINT >FZ 
34030 PRINT"a-Objet":PRINT"b-Par éléments" :PRINT"c-Bloc >LG 
": GOSUB 65020: CD=C 

34035 IF CD=2 THEN SOSUB 18000: GOTO 34070 >GM 
34040 IF CD = 1 THEN GOSUB 30000 :60SUB 44000: XG=6X (K) : >TG 

YG=GY (K) : ZG=GZ (K) : R=RE (K) : X60=XG: Y60=YG: Z60=ZG: CLS: GOSU 
B 23000: GOTO 34250 

34050 X6=0:Y6=0:Z6=0:R=0 >UV 

34060 60SUB 31000 >LT 

34070 FOR K = TO E >LM 

34080 IF CD = 2 OR CD =3 THEN FI-1 : GOSUB 5020 >JH 

34090 XG=XG+6X(K) >* 

34100 YG=YG+6Y(K) >"N 

34110 ZG=ZG+GZ(K) >™ 

34120 NEXT K >BF 

34130 X6=X6/(E+1):Y6=Y6/(E+1>:ZG=Z6/(E+1):R=0 >FK 

34140 FOR K = TO E:FI=1 >8N 

34150 60SUB 5020 >DE 

34152 FOR 1=0 TO L:FOR J=0 TO N(I) >ZW 
34154 RR= SOR ( (XT(I.J)-X6)*(XT(I,J)-X6) + (YT(I,J)-Y6 >HV 
)*(YT(I,J)-YG) + (ZT(I,J)-ZG)*(ZT(I,J)-ZG ) ) 

34160 IF RR>R THEN R = RR >RC 

34165 NEXT J:NEXT I >NM 

34170 NEXT K > CA 

34180 IF CD=1 THEN R = RE(K-l) >W 

34200 60SUB 62000 >LT 

34210 XG0=X6:Y60=YG:ZG0=ZG >«G 
34220 MOVE 300-100«XGO/R,0:DRAH 300-100*X60/R,399,3,0:M >U6 

OVE 0,200-100*YGO/R:DRAW 639,200-100»YGO/R,3,0:IF CD=1 
THEN 34250 

34230 FOR K = TO E :FI=1 >W 

34240 IF CD <> 1 THEN GOSUB 5020 >XH 

34250 FOR I = .TO L >LT 

34260 FOR J = TO N(I) >NU 

34270 XE = 300 + < XT(I,J)-XG ) t 100/R >AY 

34280 YE = 200 + ( YT(I,J)-YG ) * 100/R >AB 

34290 IF J=0 THEN MOVE XE,YE >VC 

40 



34300 IF J >0 THEN DRAW XE.YE.l 

34310 NEXT J : NEXT I 

34320 IF CD=1 THEN 34340 

34330 NEXT K 

34340 REM 

34360 LOCATE 2,2:PRINT"Proj.sur XOY 



>XB 
>NQ 
>QD 
>BJ 
>GB 
:!SCREENC0PY,2,1:S0 >AF 



UND 1,50 : LOCATE 2,3:PRINT"Hardcopy ?": GOSUB 65020: IF 
C=15 THEN ISCREENCOPY, 1, 2: 60SUB 62020: CALL fcAO00:PRINTI 
8:PRINT»8 

34370 REM création élévation YOZ >BS 

34380 CLS: GOSUB 32000 >pn 

34390 IF CD=1 THEN 34420 >* 

34400 FOR K = TO E >LJ 

34410 FI=1:G0SUB 5020 >PJ 

34420 FOR I = TO L >LR 

34430 FOR J ■ TO N(I) >NT 

34440 YE=30O+(YT(I,J)-Y6) «100/R 



ME 

>VD 
>YD 
>NZ 
>QL 
>BH 



i 



34450 ZE=200+<ZT(I,J)-ZG) «100/R 

34460 IF J=0 THEN MOVE YE,ZE 

34470 IF J>0 THEN DRAW YE,ZE,1.0 

34480 NEXT J : NEXT I 

34490 IF CD=1 THEN 34510 

34500 NEXT K 

34510 LOCATE 2,2:PRINT"Proj.sur YOZ": ISCREENCOPY. 3,1: SO 

UND 1,50 : L0CA1E 2,3:PRINT"Hardcopy ?":60SUB 65020: IF 

OIS THEN ISCREENCOPY, 1,3: GOSUB 62020:CALL &A0OO:PRJ)f 

8:PRINTt8 

34530 REM CREATION ELEVATION XOZ 

34540 CLS: GOSUB 33000 

34550 IF CD=1 THEN 34580 
34560 FOR K = TO E 

34570 FI=1:G0SUB 5020 

34580 FOR I = TO L 

34590 FOR J = TO Ndl 

34600 XE=300+(XT(I.J)- 

34610 ZE=200*(ZT(I,Jfjfifl|IB/l^ 

34620 IF J=0 THEN MOVE XE, 

34630 IF J,0 THEN DRAW XE,ZE,1.& S S > YA 

34640 NEXT J s NEXT I \S ^T >NX 

34650 IF CD=1 THoH»70 ^ X^ ^T i 

34660 NEXT K V £ ~Jk 

34670 LOCATE 2,2:PRMT*Proj.sur XD2": ISCREENCCF- ',4, 

UND 1,50 : LOCATE 2,3:Pft!W , Hardcopy ?":GOSUB 65fl20:!SC 

REENCOPY^Tlfca^JlBTO KALl 

8:PRINT#fi 

34690 pagT= 4 

34710 G0SUÎ65020 

34720 IF C$V' jtf 

34999 RETURN 

44000 REM Calcul (%*G%( 

44010 6X=0:GY=0:GZ=0:N=0:RE=0 

44020 FOR 1=0 TO L: FOR J=0 TO N(I) 

44025 N=N+1 
44030 GX=GX+XT(I,J) 
44040 GY=GY+YT(I,J) 
44050 GZ=6Z+ZT(I,J) 
44060 NEXT J:NEXT I 
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44070 GX(K)=GX/N 

44080 6Y(K)=GY/N 

44090 6Z(K)=GZ/N 

44100 FOR 1=0 TO L:FOR J=0 TO NU) 

44110 R=SQR ((XT(I,J)-GX(K))*(XT(I,J)-GX(K))+(YT(I,J)-G :>HJ 

Y(K))*(YT(I,J)-GY<K))+(ZT(I.J)-6Z(K))*(ZT(I,J)-GZ(K))) 

44120 IF RE<R THEN RE=R 

44130 NEXT J:NEXT I 

44140 RE(K)=RE 

44999 RETURN 

45000 REM ERREUR SUR BLOC 

45999 SOUND l,20:CLS:PRINT"Bloc inexistant.. ":FOR TT=0 
TO 1000: NEXT : RESUME 10 
47000 REM peniu+^fcm^vclique pages 
47010 PAGM>AGE+l:iF PAGE. 4 THEN PAGE = 2 
47020 i5C«ENOFY.l,PA6E: SOUND 1,20 

IF PA6E=2 THEN FV=0:F2= 
7040 IF PAGE*? THEN FZ=OsFX= 
HTjÙ IF P65E=4 THEN 
TURN ^ 
'ROUTINES NoX^tORE 
)10 CLS:SOUND^r5o\lNT 
TT=0 




crée. 



397? Cl£! CHAIN "M0D2# 15 
40'» REM PASSAGE SUR M0D1 # 



JR:CHAIN"M0D1#15": * 

\EM Saisie caractère * 
)10 PRINT:PRINT"Votre choix :" 
65020 CfeINKEY$:IF C$="" THEN 65020:'» 
65030 C=ASC(C*!:'# 

65040 IF C>96 THEN C=C-96:G0T0 65535:'* 
65050 IF C<96 THEN C=C-64: '» 
65535 RETURN:'» 



M O D 1 



>LZ 

>LC 
>LF 
>ZP 



>RN 
>NE 
;VB 
>PH 
>UK 
>LZ 

>GH 
>6A 

>EF 
>YF 
>Y6 
>YH 
>QA 
>DB 
>KX 



>PF 
>HA 

>NC 
>FG 
>VA 
>MM 
>NA 
>MR 
>GF 
>XJ 
>VN 
>TH 
>VP 

>uc 
>wv 

>GG 
>BB 

>EK 

>dk 

>TB 

mm 



1 REM M0D1I15 + Examiner un objet >AP 

2 IF FD=1 THEN 230: '* >MK 

3 FD=1: L = - 1:REM Initialiser L (L+l chaines dans obj >BR 
et ):'♦ 

4 DIM XT(49,12).'YT(49.12).ZT(49.12).N(49).EL*(29).C0(29 >PN 
).GX(29).GY(29>,6Z(29).RE(29>.XE(12).YE(12),XEBIS(12>,Y 
EBIS(12).ST*(20>:'« 

7 60SUB 24000: REM Choix des couleurs* >FR 

10CLS:'» >UG 

15 PRINT"MENU PRINCIPAL":PRINT: '* >CH 

20 PRINT"a-Creer un objet": '* >BN 
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m \ 






>HX 






>EH 






>EB 


PRINT"f-6estion d 


>JW 



30 PRINT"b-Co«Pleter un objet":'* 

40 PRINT'c-Stocker un objet":'* 

50 PRINT"d-Charger un objet":'* 

60 PRINT"e-Gestion de blocs d'objets" 

u cataloque":PRINT"q-ManiPuler objet ou bloc":PRINT"h-F 

usions diverses":PRINT"i-Exa«iiner un objet":PRINT"j-Fic 

hier objets standards":PRINT"k-Voir" 

70 PRINT "1-Creer une iaaqe":'* >D6 

80 PRINT'VPlan trois vues":PRINT"n-":PRINT"o-":PRINT"p NN 

180 PRINT'Q-Ouitter":'* >VM 

195 IF EL* <> " THEN LOCATE 22.21:PRINT"0bjet résident >HK 
":L0CATE 22.23:PRINT EL*:'* 

197 IF LO-1 THEN LOCATE 31.23:PRINT L+l:" ch.":'* >QZ 

200 G0SUB 65000: REM Saisie caractère: * >FP 

205 IF C=ll THEN CHAIN"V0IR#15": * ZD 

210 IF C=17 THEN END: '* NX 

220 IF C = 12 OR C=13 THEN CHAIN"DESI15": * :>E6 

230 ON C G0SUB 9000,9010.8000.5000,21000.22000.64000.6 HT 
4000.10000.20000: REM etc.... 

999 :ERA."*.bak":CLS:G0T0 10:REM Boucle MENU* >QH 

1000 REM CREER UN BLOC * >RP 
1010 CLS : PRINT'CREER BLOC D'OBJETS":PRINT: * >QE 
1020 INPUT"Nom du bloc ":BL*: * >BR 
1030 INPUT'Nojibre d'éléments ":E:'« >HN 
1040E=E-1:'« >QK 
1050 FOR K=0 TO E: » >LJ 
1060 PRINT"Objet nunero ":K+1:'* >DM 
1070 INPUT EL*(K):G0SUB 5020: REM Charger objet ♦ >RB 
1090 NEXT K : '* CJ 
1100 GOSUB 6000: REM Stockage fichier-bloc * >LG 

1999 RETURN : * >QC 

2000 REM LECTURE BLOC * >RH 
2010 CLS : PRINT'LECTURE BLOC" : PRINT: '* >6V 
2020 60SUB 31000 >CE 
2035 PRINTBloc ":BL*: PRINT:'* >ZM 
2040 FOR K=0 TO E:'* >LJ 
2050 PRINT EL* (K):'* >MA 
2060 NEXT K :'* >CG 
2070 FOR H=0 TO (E+l)*200 : NEXT n:REM TetPonsation >ZA 
< 

2999 RETURN: '* >QC 

3000 CLS:PRINT U DETRUIRE BLOC+OBJETS" >HN 

3999 RETURN >HD 

4000 CLS:PRINT"COPIE BLOC+OBJETS SUR AUTRE DISQUETTE" :P >HK 
RINT 



4999 RETURN 

5000 REM CHARGER UN OBJET: 
5010 INPUT'Non de l'objet 

* 

5017 ON ERROR 60TO 23000 
5020 OPENIN EL*(K):'* 



a charger" ; EL* <K):EL*=EL*(K): 



>HE 
>VD 
>JE 

>RZ 
)NB 

5025 INPUT#9.C0(K),GX(K),GY(K),6Z(K).RE(K).L:REM L'abje >VH 

t a (L+l) chaines * 

5030 FOR 1=0 TO L : REM Pour toutes les chaines allant >EQ 

de a L * 

5040 INPUT #9.N(I): REM Notbre de segaents sur chaine » >YY 
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5050 FOR J=0 TO N ( I ■ : REM Pour tous les Points de la cha ;CN 
ine d'indice I * 

5060 INPUT #9.XT'.I.J).YT(I.J}.ZT(I.J):* -G2 

5070 NEXT J:(CXT I: ♦ ;*NU 

5080 CLOSEIN: '♦ ' VE 

5999 RETURN: « >QF 

6000 REM STOCKAGE BLOC * RC 
6005 PRINT"Je stocke le bioc ':«.$:'§ JW 
6010 OPENOUT BLI:'» >MB 
6020 PRINT #9.E: * 6A 
6030 FOR K=0 TO E: * >LM 
6040 PRINT #9. EL* (h: ♦ >P2 
6050 PRINT #9. CO(K):'# NY 
6060 PRINT #9.6X(K):'« >P£ 
6070 PRINT *9.6YiK>:'« >FG 
6080 PRINT #9.GZ(K):'* <PJ 
6090 PRINT t9.RE(K):'« >NH 
6100 NEXT K: "• CE 
6110 CLOSEQUT:'» >GA 

6999 RETURN: * QG 

7000 REM CHARGEMENT FICHIER BLOC ♦ >BF 
7005 PRINT" Je charge le bloc ":BL$: * >JN 
7007 ON ERROR GOTO 45000 >RE 
7010 OPENIN BL$:'« >LN 
7020 INPUT #9.E : * >GF 

FOR K=0 TO E: * >LN 

7040 INPUT #9.EL$(K): * >PD 

7050 INPUT #9.C0(k):'* >NC 

7060 INPUT *9,GX(K:>: '♦ >PJ 

7070 INPUT W,6Y(K):'« >PL 

7080 INPUT #9.GZik>: ♦ >PN 

7090 INPUT #9.RE(K>: ♦ ,.PD 

7100 NEXT f: * >CF 

7110 CLOSEIN:'» >VA 

7999 RETURN: '» >QH 

8000 REM STOCKAGE OBJET >T0 
8010 INPUT'Noa de l'obiet a stocker":EL$:EL*(K)=EL$ >EL 
8015 60SUB 44000: REM CALCUL SX.GY.GZ.RE >HR 
8020 8PEN0UT EL$(K) >NH 
8025 PRINT #9.C0(K).GX(K).GY(K).6Z(K).RE(K).L:REM L'OBJ >HR 
ET A (L+l) CHAINES 

8030 FOR 1=0 TO L: REM Pour toutes les chaînes allant d >DY 
e a L 

8040 PRINT #9.N(I):REM Nombre de segments sur chaine >XN 
8050 FOR J=0 TO N(I): REM Pour tous les points de la en >DR 
aine d'indice I 

8060 PRINT #9.XT(I.J).YT(I. J).ZT(I.J) >FP 

8070 NEXT J:NEXT I >MX 

8080 CLOSEOUT >ZG 

B999 RETURN >HJ 

9000 REM CREER UN OBJET >RT 

9005 L=-1:K=K+1:EL$(K)="":EL$="" >ZP 

9010 CLS:PRINT"CREER UN OBJET":PRINT >HN 

9020 PRINT"a-Creer chaîne par chaine" >PL 

9O30 PRINT a b-Objet de révolution" >KY 

9040 PRINT"c-Travailler sur un objet standard" >EV 

9050 PRINT"d-Creer un pris»" >DY 
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:GZ(K) ELSE PRINT" 



:RE(K* ELSE PRINT" 



;dn 

>MX 

Fû 

>VU 

>NR 

HL 
Hl 

>ML 
>XN 

GQ 

>TD 

NT 

n 

m 

■nu 

>NZ 

»;[■ 



9060 PRINT"e-Creer un cercle" 

9070 PRINT'4-Creer un arc de cercle" 

9090 GOSUB 65000: REM Saisie caractère 

9100 IF C>7 OR C =-51 THEN 9999 

9102 IF C<0 THEN 9000 

9110 ON C GOSUB 26000: REM. etc.... 

9999 RETURN 

10000 REM DETAIL D'UN OBJET 

10010 CLS:PRINT"DETAIL D'UN OBJET" -.PRINT: 60SUB 30000:PR' 
lNT:FRINT"Sortie imprimante ?': FLAGIMP=0 
10020 GOSUB 65020: IF C=15 THEN FLAGIMP=1 
10025 IF FLAGIMP=1 THEN PRINT#8. "Détail de 1 objet ":EL 
*:PRINT#8 

10030 IF FLAGIMP=1 THEN PRINTI8. "Nombre de chaînes ":L+ 
1 ELSE PRINT "Nombre de chaînes ":L+1 
10040 IF FLAGIMP=1 THEN PRINTI8. "Centre de gravite :" E 
LSE PRINT-Centre de gravite:" 

10050 IF FLAGIMP=1 THEN PRINTt8."6X=":6XIK) ELSE PRINT' 
GX=":GX(K) 

10060 IF FLAGIMF=1 THEN PRINT#8."GY=";GY!K) ELSE PRINT" 
GY=":GY(K) 

10070 IF FLAGIMP=1 THEN PRINT#8."6Z 
GZ=":GZ(K) 

10080 IF FLAGIMP=1 THEN PRINTM.'RE 
RE=";RE(K):PRINT 
10095 PRINT"0n examine les chaînes ? , :GOSUB 65020:1F C 

15 THEN 10999 
10100 FOR I = TO L:PRINT 
10102 IF FLAGIMP=1 THEN PR1NT#8. "Chaine n 

> ";N(I)+1:" Points": PRINT ELSE 

ro ":I+1:" - — > ":N(I)+1;" Poi 

10104 FOR J=0 TO N(I) 

10110 IF FLAGIMP=1 THEN Ff INTI6. 

.J) ELSE PRINT"XT(>rr^";B^ 

10120 IF FLAGIMP=1 THEN PRINT#8. 

,J) ELSE PRINT "YTC 

10130 IF FLAGIMP=1 THEN PRINTtS. 

,J):PRIN^»8 ELSE PRINTJpf(*rV";J;")= u :ZJ 

10140 IF FLAGIMP ; 1 TON G0SU>«fi20: Pfijd 

10160 NEXT J:NEXT ! 

10999 RETURN 

14000 REM INCORPORER Lft C 

14999 RETURN: t£\j 

18000 REM ARCTANGENTE* 

18999 RETURN: '* ># 

20000 FICHIER OBJETS STO 

20999 RETURN ^^^ 

21000 REM GESTION DE BLOCS D'OBJETS» 
21010 CLS :PRlNT*GESTION DE BLOCS D'OBJETS" 
21020 PRINT"a-Creer un bloc d'obiets": '♦ 
21030 PRINT"b-Charqer et lire un fichier 
21040 PRINT"c-Deqraisser un bloc^î 
21050 PRINT"d-Detruire un bloc": '♦ 
21060 PRINT'e-Copier ensemble standard": '» 
21070 PRINT" f-CoPier un bloc et ses éléments":'» 
21080 PRINTVDetruire bloc+objets": '♦ 

■ 21090 PRINT"h-Compacter un bloc": '* 
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21100 PRINTi-Fusion blocs" 

21110 60SUB 65000:'» 

21130 IF C>9 OR C < THEN 21999 

21135 IF C=<? THEN C=8 : CHAIN"H0D2 

21 MO ON C GOSUB 1000.2000,28000,29000.27000,4000,3000, 

42000 

21999 RETURN 

22000 OPERATIONS SUR CATALOGUE 

22999 RETURN 

23000 Erreur sur objet 

23999 CLS:PRINT"Ob jet inexistant... ":SOUND 1.20:F0R tt= 
0T0 1000:NEXT:EL*(IO = "":ELt=""::RESUME 10 

24000 REM CHOIX DES COULEURS ♦ 

24999 RETURN:'» 

25000 REM TRACE EN PLAN DE L'OBJET EXISTANT * 

25999 RETURN: * 

26000 REM CREER DES, 

26010 IF L=49 THEN PRINTTrop de chaines.deso! 
UB 65020: GOTO IbpT \^^\ \X^ 
26020 l=L»î: REM hcraaenter électif 
26025 CLS: PRINTSATSIE CHAINES AU 
26030 INPUT"N«*re de segments ":N(D 
26035 IF NIL) 12 THE* PRIMT "12 seg« 

5020:GOTX26025 ^T 

FOR J=0 TO N(L): REM Boucle de saisie de coordcnn 
t \ 
26050 PRINT-Poin 
26060 MPUT"XT=";X 
INPUtV=":YT 
INPUT'*z\:ZT(L 
NEXT J 
PRINT" 
HEN 26' 



CHAINES m CLAVIER fcfc 



>B2 
>LZ 

zz 

>BC 

PC 
>CK 
>PD 
>DA 
>RO 

>YD 

>XG 
VF 
>XH 
.FB 
>GP 






":GCSUB 65020: IF 



C » 15 THEN 260; 
^^6130 PR^jJ^r Un 
f F C = 15 THEX 26010 
26999 RETURN ^L+^Z 



e autre chaîne ?":60SUB 65020: I 

26999 RETURN 
27»0 COPIER ENSEMBLE STANDARD 
RETURN 

/ÈGftArSSER UN BLOC 
*? RETURN 

«^DETRUIRE UN BLX 
GOSUB 31000 
GO PRINT::ERA.BL$:BL$="" 

29999 RETURN 

30000 'IDENTIFICATION OBJET 

30002 IF L <:> -1 AND EL* ■"" THEN PRINT"Objet sans n 
m présent en me«oire":PRINT:PRINT"On garde ?":GOSUB 65 
020: IF C = 15 THEN 30999 

30010 IF EL$ <> "" THEN PRINT"Objet résident ";EL* 
:PRINT:PRINT"On garde ?": GOSUB 65020 
30020 IF EL* <> " AND C = 15 THEN 30999 
30040 60SUB 5010 

30999 RETURN 

31000 'IDENTIFICATION BLX 

31010 IF BL* <> " THEN PRINT'Bloc résident ":BL*:PRINT 
:PRINT"0n garde ?":G0SUB 65020 
31030 IF BL* <> "" AND C= 15 THEN 31999 
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:de 

>UK 
>UN 

>UR 
>CB 
>TG 

;XM 

>PH 
>DE 
>PJ 
>DF 
>PK 
>DG 
>LR 
>XJ 
;QA 
>CJ 
>GT 



>DZ 

>BE 
>CH 
>PC 
>CK 
>YU 

>AK I 



31040 PRINT: INPUT"Nom du bloc ':BL*:&0T0 7000 TB 

3199 e ? RETURN PB 
32000 REM CREER UN CERCLE * 

32999 RETURN: « ff 

33000 REM CREER ARC DE CERCLE* 

33999 RETURN:'» 

34000 REM CREATION OBJET DE REVOLUTION» .;•} 

34999 RETURN: '» 

35000 REM OBJET D AXE OX* LQ 

35999 RETURN:'* <J 

36000 REM OBJET D AXE OY» l? 

36999 RETURN:'» 

37000 REM OBJET D'AXE OZ:* 

37999 RETURN: '« -y f, 

42000 COMPACTAGE BLX DB 

42010 GOSUB 31000 Ll 

42020 K=0: GOSUB 5020 -tf 
42030 FOR K=l TO E 

42040 OPENIN EL* «Kl rjF 
42050 INPUT#9,C0(K),GX(K),GY(K).GZi : >,RE(K),U 
42060 IF L+LD49 THEN PRINT'TOMPACTAGE IMPOSSIBLE... :5 .E 
OUND 1,20: GOSUB 65020: GOTO 42999 

42070 FOR 1=0 TO Ll IF 

42080 L=L+1:INPUTI9,N(L) TF 

42090 FOR J=0 TO N(L) ;NF 

42100 INPUT»9.XT(L,J> »' 

42110 INPUT#9,YT(L.J> >0H 

42120 INPUT#9.ZT!L.J> >QP 

42130 NEXT J:NEXT I NC 

42140 CLOSEIN >UB 

42150 NEXT K BH 

42160 BL*="":EL*="" ~MN 

42999 RETURN PF 

44000 REM CALCUL DE GX.GY.GZ et de RE ♦ DB 

44999 RETURN: '♦ >XJ 

45000 REM ERREUR SUR BLX 

45999 SOUND 1.20:CLS:PRINT"Bloc inexistant.. ":FOR TT=0 >LZ 

TO 1000: NEXT : RESUME 10 

54000 REM CREER UN PRISME» >VR 

54999 RETURN:'» 

60000 REM DEFINITION DU TYPE DE SAISIE DE CHAINE PLANE* ZF 

60999 RETURN:'* >X6 

61000 REM SAISIE ECRAN* >RY 
61999 RETURN:'* >XH 
63000 CLS:PRINT"Routine non encore créée": SOUND 1.20: F >JF 
OR TT=0 TO 200: NEXT 

63999 RETURN >pj 

64000 REM CHAINAGE SUR M0D2 >VP 

64999 CHAIN"M0D"il5 >NZ 

65000 REM Saisie caractère» >«T 
65010 PRINT: PRINT'Votre choix :":'* >6F 
65020 C*=INKEY*:IF C*="° THEN 65020: '* >BB 
65030 C=ASC(C*):'* >EK 
65040 IF C>96 THEN C=C-96:G0T0 65535: * >DK 
65050 IF C<96 THEN C=C-64: '* >TB 
65535 RETURN: '* >HH« 
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GUIDE DU 
PROGRAMMEUR 



125» IF ERR»25 IHEN OsVj-WY 



£31 




INT CW»(7l;0*IC«l;*nCHIEf 



TfcT: 



Votre programme est maintenant fin prêt, il ne vous reste plus qu'à envoyer 
votre œuvre à CPC. Mais n'oubliez pas : 

• d'envoyer les programmes sur un support magnétique (disquette ou cassette). 

• de joindre un mode d'emploi détaillé manuscrit ou dactylographié, la liste complète des variables peut 
également être utile. 

Quelques cas spéciaux : les jeux. Joignez les solutions ou bien des astuces pour "visiter" l'intégralité 
du programme. 

— les programmes sources en assembleur seront publiés à condition de posséder un commentaire 
conséquent. 

• les listings sur papier ne sont pas obligatoires puisque les programmes sont de toute façon réimprimés. 

• le programme enregistré doit répondre à certaines caractéristiques. 

— la taille des commentaires mis en REM ne doit pas dépasser 35 caractères. 

— il faut éviter l'utilisation des codes de contrôles (CTRL X, CTRL I etc.) ceux-ci n'étant pas "digérés" 
par l'imprimante. 

— les listings en assembleur doivent être accompagnés des chargeurs BASIC adéquats. 

Enfin, essayez d'être original, nous croulons sous les Master-Mind, ies Yam, les gestions de fichier, 
les lotos sportifs ou non. 
A bientôt dans CPC. 



PARTICIPEZ A CPC ! 



LE PROGRAMMEUR 

Nom Prénom 

Adresse complète 



Tel 



Age 



Joindre un relevé d'Identité bancaire pour paiement 
de vos piges. 

Attestation sur l'honneur 

Je soussigné 

déclare être l'auteur du programme ci-Joint et ne 
l'avoir jamais proposé à une autre revue. 

Le A 



Ullll|lll">M /. 



LE PROGRAMME 



Nom 



Catégorie 
Taille 



Q Jeu □ Utilitaire □ Educatif 



Périphériques utilisés 

Support Q Cassette □ Disquette 

Compatibilité (testée) avec : 

□ 464 Q664 □ 6128 QPCW8256 

□ PC1512 QPCW8512 

Signature 



ir diaqudlc. 




r Knil iiCIf Lu ll.iudi- l'.ui -.SFSI70MUV. 



44 



CPC n" 35 - Juin 1988 




CATALOGUE 



Vcnic Par Con 



orrespondancc 




Ce logiciel s'adresse aux élèves du second cycle; 
il permet l'étude de fonctions, de suites numériques 
et la résolution d'équations trigonométriques. 

Options disponibles : 

• Etude de fonction simple ou avec un paramètre 
m, suite numérique, équation trigonométrique... 

• Etude de suite arithmétique ou géométrique... 

• Possibilité de changer de repère (ou de le gros- 
sir), d'Intervalle étudié, d'amplitude graphique... 

Disponible sur disquette 3 ' pour CPC 664 et 6 128. 
au prix de : 230 F 

Réf. : BEP001 



MULTICOURBES III 

de Sylvain VIEUJOT 




OFFRE SPECIALE 




AMSTRAD CPC 464, 664, 6128 



Synthétiseur vocal : 545 F 450 F (Cass disq .) 

Parle français comme les Français. Une voix claire, sans souffle. Sortie 
son sur HP du CPC + extérieure (0 35 pour casque stéréo). Très 
facile à utiliser avec le nouveau logiciel VOCA 100, à partir du texte 
simplifié (livré avec PHONE 100, Démonstration). 
(Référence casque page accessoire Informatique) 
MT.1MM01 



Valable jusqu'au 30-06-88 




BlIOil 



BASIC 



3> 



INITIATION BASIC - niveau 1 

GW BASIC et BASIC Microsoft 

M Un 

Le •best-seller' de la ntijonnlormaeque. Los oommandss M Iss tissruceoni 

» uni ttxdees a raids * «temple* <(• progr amme* loutrra avec » résultat 

i)a au acfcn. Tout y est au»» : sjv». «uni*», eonmanutaa. prttenaton 

pou redurs rsflort d assimila ton au «ici mWmum. 

CODE ER52 (176 pages) : 130 F. 

INITIATION AUX FICHIERS BASIC 
iftsM 

Avac ca Ma. «oui dtcouvnts! progressivsmsnt la "mécanisme' de la 
consi Lion d'un khi* an BASIC ktacectt puis celui da aon «tddBlon 
L'aulsu. a raida tfaiemp»* ccndsts, voua lait axptaai successivement 
lat ea*snj an memoie hlarna. a axai aéqusnM al a accès died. an 
évitant laa tcuars Isa pe/s courants, prhdpaet causai da pana da temps 
CODE ER 189 (160 pages) : 120 F. 

PASSEPORT POUR BASIC 
A. Sus* 

Da ABS a XORAW. cet ouvrage lagioupa Butas laa oomm andes. tondons 
al niuctons dss dftarents BASIC Vous ruitaanu sdl comme un de- 
eorataie eiphabtlque pou connalia rapidement remploi (fun mol par 
San*, sosoornmeungudedelansapstxidepog/ammes.puaqueta 
(«mes proaas a certaines machr.es son! rep«as par dsssymbd as 71 
phrjue* Un tins 0* « presque a gard* a portos da la mam . 
CODE ER 402 (1 28 pagei) : 45 F. 

INITIATION A LA MICRO-INFORMATIQUE 
Le microprocesseur 



langages, calcul tsnake. codages, tondons icoques. «cfndco» al oga- 
nisalon dss miaopTOoasaaus la MC 6»O0 da Motorola, las marnâtes, 
droits al tyosmss dVssriaca. la progr amm ason 

CODE ER 407 (160 pages) :45 F. 

INITIATION BASIC -niveau 2 
programmation structurée D. 

CnxnsfelO VHtm 

C» lue accents» marna aux débutants voua parmai ds ratas* dss po- 
grammes eSaks al sfficaoas. dgnes da proaHSkmsts I vous monta 
comment pou chaque apptcaaon aussi comptais saler», daim laa don 
nées al las taamentt pus «aduaa aon tondonnamanl sous une (orme 
graphique ndependan» du langage de piogf ammaeon 

CODE ER 158 (272 pages) :165 F. 

REPERTOIRE MONDIAL DES BASIC 
IMsasI 

les pièges Ua a remploi dut marne mot-dS su (XI* ans ordnaleurs . 



l'airpjoi des aies BASIC s* les dMlentes machines, le ou las or* es 
BASIC neoessanes pou une acton pied se au un adrvatau donn» ; tab- 
leeux comparai ts des symboles ; indsi des mo» datas* selon lau rôle ; 
Isa des mots pou chaque vsrsion. Un oui pieds erlcaes. Wâspemable 
t But programmeur an BASIC 
CODE ER 123 (448 pages) : 185 F. 

J'APPRENDS LE BASIC 

Il CM 

Se serv» d'un ordnaBu peu par alla oomplque al réserva aui édites 
Dana os Iws. des In* au 1 2 ans si dus.... guide par un •prol sympa', on 
apprend le BASIC progr essrvemant et an l'amusant De nombreui a er 
dees sort proposas avec leus ccnecsbns 

CODE ER 484 - (128 pages) : 75 F. 

• NOUVEAU • 

PRATIQUE DU BASIC COMPILE 
compilation - programmation 
H.Uen 

un programme avac le oomplaleu QulekBASC.de Mo oso«, an venions 
I al 2 I iisis». an partarler. su les oWfsncs* qui siistent anse las 
BASIC compas al rterpr est Os nombrarjj exemptas, uaksrnenidevaioppss. 
rendent évidents» (ouïes las notons a acqueri 
CODE ER 17(160 pages) :120 F. 

8256/8512 GUIDE DU BASIC 
ET DE JETSAM 

J.-LGrecoetM Uueni 

<>gude«luniSx:lannaf*corT^atduBASCAms»addsponiaaaulas 
moo*«PCWri?S6*PCW&12,OhaqueinB>vic»cn.c^ 
est présentée, commen t ée el Buttée par des eiemdes ds programmes 
L'aude de ces exemples parmetla au lecleu de mieui sxptos* les pas- 
scies* da son aanatsu. La Ising complet d'un progr amme da gesson 
de Iota* est propose an ftn d'ouvrage. 
CODE SY 021 5 (304 pages) : 1 38 F. 

TECHNIQUES DE PROGRAMMATION 
DES JEUX BASIC 

tt Faaw-flarrafy 

Cet ouvrage orient des programmes ds jaui sait pou les or dru «us 

Ainsi ad CPC *64, 664 «61 21 Chaque programme est accompagna dur» 

analyse pedgogique da la structure dss phases essenoeles al de uUeaui 

résumant la lonclon st les vatsut possetat dss pr vocales variabkts.De 

quoi comprandre. an * amusant comment as 1 Misent dss programmas 

de (sut. 

CODE SY 208 (160 pages) : 98 F. 

AMSTRAD CPC : 

LE BASIC AU BOUT DES DOIGTS (n° 3) 

lr«oduct^avr>>elaauBASCdarAmsaadCPC.celMepermeldappr»v 
are Isolement la progr amnaten : rstuesens BASIC, anayse deaprobUrnas. 
algorSnmss ccmpleiss. sic Ds nombreui exemples de progr armes Sustert 
les notons développées 

CODE MA 1 19 (266 pages) : 149 F. 

AMSTRAD 6128 : LE GRAND LIVRE DU BASIC 

Cervier«rrieideiplo«leacapaalMrJuB>SCic«imot«Onytouve 
bases ds programmes, bnesonnsmont imams du BASIC. Iss lis. tentées, 
masque d Serai protseton corne las copies, etc 
CODE MA 168 (263 pages) : 149 F. 
CODE MA 268 (Livre e disk) : 249 F. 



PASCAL 



•NOUVEAU» 

PRATIQUE DU TURBO PASCAL : 
CREEZ VOS LOGICIELS 
JJ server 

C* Ivre vous enseigne de façon progressive el psdagogrjue comment 
analvssr pus décomposer les jpohcaaons même les pajs complsias. se 
labrtjuer dss ouest prdessxmnals an TURBO PASCAL, créer des «crans 
de pressnason ou ds sasts. dss menus dsroulan», lantHisr des données 
ente proddels. adapter Buts mpnmanie a vola orrjnatu 
CODE ER 40 (224 pages) :190 F. 

INITIATION PASCAL 

JC Gufemoi 

Le présent ouvrage s'est appuya su le PASCAL USC D tout en respectant 

aumsutssspedSulonsdesnanmeiabtiesparlepiqetSOl Chaque 

porv, du langage ta«rob^(hjnd»»sloppam ant acorjmpagr^rftjndagrarrrne 

de syntaxe el est «usaapai dsssxsmptes Les diapees sort tout »fnries 



par des exardees asnque le lecteur puisse versler ses coma stances 
CODE ER 74 (224 pages) :110 F. 

■ NOUVEAU • 

70 PROGRAMMES TURBO PASCAL 
M Caceuef J.-C fjufTeroi 

Vous pouvkuHmt ce kvreque vous sachiei ou non ecnr>.d«pogr armas 
en TURBO PASCAL. Les auleus y deaivent soigneusement chaque pro- 
gramme an donnant des sxamptss Isslss su 6M-PC Las programmes 
reproduis tepresenteni rigoueussmsnt ceux qui ont touni les reusus 
hessaes. 
CODE ER 124 (192 pages) : 130 F. 

INTRODUCTION AU TURBO PASCAL 

D Sttàon 

Cet ouvrage permet 1 rutoaleu d expiât* la puissance eicspSonnsss 

de ce langage 

CODE S Y 0180 :198 F. 

GUIDE DU GRAPHISME 



l'Amttad possède dss quelles graphiques aaxnames el one de nom- 
or eusse insluckns p*melant de reatis* des apphcalons les p*(or 

manss*C*ouviagspres«ilsira>ded«iemcl«derjoo;ammesenBASiC 
toutes les lechnrjuea indspensablaa pou per matle au lecteu da raahser 
de lagon ample et rapide sas pr ogrammes /aphiques. Las exemples eûtes 
permenort*mlemoorrv^endrelesrxncip«sdegesaondetcouteut. 
d\^euJondesd^*sr«mooSsv«>so.4jlaotdeMurces«#tarsaleujlwn 
de graphiques animes. Les programmes torxscnnert au les modèles CPC 
«64. CPC 664 et CPC 61 ». 
CODE SY 0141 (208 pages) : 108 F. 

PREMIERS PROGRAMMES 

fl./a»s 

Eoivei vol a pr emi* progr amme BASIC au Amslad en mont du» heu e I 

D'une prsssnBlon dase. comportant de nombreui dagrammas et Huv 

lalons en coUeu.ce Ivre vouaentergne les bases cela progr ammalon 

en BASC su Amslad. Avec U. vous apprend et Ipogr arme- en oualque» 

heuss. que» 91s soant votre âge et vole krmason Aucune eipkienc* 

préalable de la progr ammalon n'est nécessaire. 

CODE SY 0105 (248 pages) : 108 F. 

JEUX DE REFLEXION 
a fêjat ftarraly 

Cet ouvrage contant vmgt programmas de jeux de red aron sens pou 
Iss ordnateut Amslad. Da fiernes dassrjues comme » Pendu ou les 
Tous ds Hand ou résolument nouveaux, comme Maegri ou la Mare aux 
Diables, ils p*moasnt de jou* avec rade de roaratau ou conte lu 
Chaque programme est eocompagn* dune analvse padago^que de la 
structure des phases esssntanes « ds tausaui rasumaRt la loncson « 
Iss vatsus possbsss dss prndpalet variables De qua cor pende en 
s' amusant, comment se réalisent las pr ogrammes de /eux 
CODE SY 0207 ( 200 pages) : 79 F. 

GAGNEZ AUX COURSES 

J-C Oesporie 

(^l«eieporxs»deipaqu«owxnaniilestpos»bled\jB»e<unard- 
naau pou sud* une couse du» man*e raknnalle et rapide I est 
compose d'un programme Camion 700 ignés dont r objet est srnpts : 
rjouu»ccuse*iv»e.salrunoudesdassemenisteonquesd"arnv*e 
an loncson de rJMrer* ostras I a* composa de doseur s partes dàancat: 
»sappieaalor»p*sorrva»t.lesporwslcs.»ssatsrxques »s$vnr»s»s 
ganfeales. la ■ersar ds suivi des chevaux. 
CODE S Y 01 97 (11 2 pages) :98 F. 

GUIDE DU BASIC ET DE L'AMSDOS 

J L Greco elM Lauranl 

Ce gui» est un dctconarecomplel du BASIC Amslad dsponO» su ta 
mcO*et CPC «64, CPC 664 elCPC 61». Chaque ins truclon. commande 
ou loncson est présentée M oommenlee et Justes par des «temples ds 
progr ammes. L'étude de osteiempl es permeoa au »d»u de mism expia»» 
les possMIes ds son ordnalau Causns ds oss programmes pouront 
même ese uolees dractsment ou rsSgr ts a dss progr armes pue mçcraro 
CODE SY 0159 (288 pages) : 128 F. 

GRAPHISME EN TROIS DIMENSIONS 

T. tacfiandflobert 

Vous peut», grâce t oa Ivre, représenta des porvedse. des suitaoss. 

voie des objsa plus complaïas en nos dmenaons su reaan de vole 

ddrvilw. Les laisdvot» pou ta oomtv* sous :ous leurs angles Sup- 

prm* les parles ou. dans la real*. set aent disamuass au rsgard. asn 

de rendre rmpr esann derelel enooreplus saiateante Oasah* des lestes 

ou des pestas images su des plan» qui semdenirtdrtes.su des canes. 

des sphtre» ou dss eyandrss. . Ce gens ds lesesason ne necesaar a ja 

mais plus ds 200 1 300 ajnss ds BASIC al même souvint beaucoup mdns 

su vols Amslad 

CODE SY 0157 (240 pages) : 148 F. 

ASTROLOGIE, NUMEROLOGIE, BIORYTHMES 
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P.BcufmM 

Ca ouvrage se présenta ai quai* patte : astotogi* occidentale, m» 
kgi«(**d««.ruii*olc9».biai*m»« Claqua p»»»» oomor and un eipo- 
M w It domaine coradér», puis ui lor>6« d* calai « dYtaprealon 
dont fanatvs» M ttétaM* point par pdnl C* hr» pourra! mut tlmtula 
i-ilaton a raseotogje. U numérelooji» « I» brorytim*» tur Amiiacr car 
il présente Im éléments de tau de om corriaietartces humaines « prr> 
pca» Im ouil de calcul nkMuia 1 lajf apcficaeon 
CODE S Y 01 67 (1 60 pages) : 1 08 F. 



ASSEMBLEUR 



RSX et routines assembleur sur Amstrad 
OftoftJ-J. nttva- 

De tes rornbraui programme» de graphisme» « d» matamatques par- 
meaont jui pcauatseurt d'Ami» a) (464. 664. 6128) <fam«kr« tours 
crxrukunc» ai MumbtMt Z80. 71» 1 dn Intauclcnt tpédalac : 
lit RSX. h pourront ara abtarà un* pKa grand* raid te (feiécuton « 
rM tel b«u graphismes, le» nombran eiemptes « commai taras ardent 
laariravlaciterTiwt Intox*». 

CODE PS 352 (368 pages) : 200 F. 

INITIATION AU LANGAGE ASSEMBLEUR 

BGaJWon./WUai 

U •«• vous eneeigrie ccmment programma ai asaembu ai lavas 

(fur* dnquantair» dsiadoie-programme» de drrlcuM gradué*. I l'appui* 
w h ratai* d*t miaoproc«»«jri 80BO, SMS. ZSO. MCS 600. «c. I 
veut pameaa déborda ta ptogrammalon *n attanbtaur aurai Caan tut 
*^o><idinjiajriin(>«**o^iur()«ma*irw«ar<]»<)d*bu-»au. 
CODE ER 1(192 pages) :130 F. 

GRAPHISME EN ASSEMBLEUR SUR AMSTRAD CPC 
F.Pttnt 

Ca ouvrage pâma de programma dé* appbcator* graphique» ai as- 
sembleur aur Amttad (464. 664. 6128). 0* nomoiautM toutln*», tvrées 
•M ta tam» d\«i programme BASIC « d"un laehg assemblé actarv. ranaajur 
iril*»l'âii«mol«ji»progr»*»adan«ta<Mnnarttanc*d<.laptograT!™a 
knduZSO. 
CODE PS 340 (304 pages) : 145 F. 

PROGRAMMER EN ASSEMBLEUR Z80 
A. Atari 

Un» rèatai I rastamblai Zr» : après quelque» déMkn* « r appas 
tu rassembleur an général, rautaur détale Im hstuetons aatambiait 
Z». oui» ta* pMudo M maaoHnstuctons. les demtars chantes «ni 
contactés a d*a eiemptat. Le ht» compara d* nombran nadcas oorrloét 
Oeui »n«« uni consacrées an patcuia/rtts d* rAmstad « du USX 

CODE PS 373 (224 pages) : 165 F. 

MIEUX PROGRAMMER EN ASSEMBLEUR 
r. tacnand-flooart 

M*hod*»*proaanma»ona>aj*antjiauZM.aorampagn*Md«nom^ 
bran ai «moi*» d* programma dappicatan tonctonrwirt ur la» Amstad 
CPC 464. 664 et 6128. 

CODE S Y 0193 :148 F. 

PROGRAMMATION EN ASSEMBLEUR 
G. ftg&Sméf 

Tc«l«i^al«uscfAmttadqurtulrrta>»cA«lcinax*»jwmalim» 
la» t*»ouicat du BASIC touvaont dan o« ouvtag* l*t éUman nécet- 
sers» pour aborda la programmaton en aaaembtaur. Apres un court rappel 
r/attViMMqu* bîiarte, ta* principale» instuctont du mrfmrjtniitawn ZSO 
sont d tau» « accompagné** d*aumpl<a d» »out-programm*t «ois a 
r*ot«raa»aT«lajdATs>adl»l«cUua^ai«aaracoiivna)it*aVta 
0*» programme» beaucoup plut rjalormarrt» tout <n comprenant tniaa 
la roncferriemait da ton nwrc-adnitajr. 
CODE SY 01 36 (208 pages) : 1 08 F. 

AUTOFORMATION A L'ASSEMBLEUR SUR CPC 

Conl«M un ht* « m rogicW. C* tvr* perm*i au novice d* malliter la 

proaaTyivj»onZ»gta»»lam*lMC*»ilca<»4jf>Wit»on Dr, nom- 

saut eiemptes Huilant ta» drtarenlM étape». D*» crade*» (Im sdu- 

lon» «mt Icurm) tenait w» connaratancM « panait été d« «ramait 

essayés avec la kggtoM. C* betoa en composa d\n aroambtaur. tfun 

ttasaseantJai a <Tun ptogtanm* cfeiemple Avec rassembleur ctéM 

c*» ptogranmai an langag* maohin* pouvant «ta uliat» r**ctansnt 

nutCP/M. 

CODE MA 226 (cassette) : 195 F. 

CODE MA 326 (disquette) : 295 F. 

CODE MA 426 (disquette PCW) (255 pages) : 295 F. 

Désassembleur et CP/M seulement sur PCW. 



LANGAGE MACHINE 



PROGRAMMES EN LANGAGE MACHINE 
SWtbb 



GOSUB. FORNEXT « tout (Taoord » W*.. pu. cal noton» «jil 4>- 
plqutat a la ratitaton oVi (tu tfadtav D» ftomoratn ax»progtarmvat 
pourrcrit«>*rtirttra(par»l*clwrriansia»pqxMprograTirrM 
CODE SY 195 :82 F. 

LE LANGAGE MACHINE D€ L'AMSTRAD CPC 

C*tvt**»tda«»n»aBuic*uicMrl»ùaitatopMlanqu*l*BASIC 
Oaa barws d* programmaton «1 Ataanbrauj a ruaKaton daa routnaa 
lynam*. tout ait atptqu» avec d» nombtaa «lanpra» Contani ui pro- 
gramnva Aaaambtw. moritai « daaaiaatnblaui. 
CODE MA 123 (272 pages) : 129 F. 



AMSTRAD CPC ET PCW 
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BASIC PLUS 80 ROUTINES SUR AMSTRAD 

Mtiarth 

l'aaajr prepea* 80 routnat pour arnutar daa taiclona cul n'axhnail pu 

cw*ct»m«it ax la macNn». L*t potaoritt» du tvnhatta» d* ton «ont 

d»v»topp»at pour programma un morcuu da muticu* ou pour ptoduia 

«a» esta tpedaut. U tacttu tcuvaa «gaiement da» iraaucfora gta- 

pr>cvaiavoru*M»iurMnul<iiauiac«aitviu»riwruaon. l»l*cuur 

ddt d*)a connaît» la BASIC d* rAmttad CPC pou uNia au miaui cet 

ouvtag* 

CODE PS 286 (168 pages) : 100 F. 

AMSTRAD : LES JEUX D'AVENTURES (n° 5) 

C* tn» feurrit m tvtttm» ifavaiuw cornpM. avec tdaur . intaprtau. 

rouan» ulllar» a torai de jaa. ànti qu'un genétatu tTavaiua» 

pour programma vounnem*. 

CODE MA 121 (250 pages) : 129 F. 

LA BIBLE DU PROGRAMMEUR 
DE L'AMSTRAD CPC (n° 6) 

Aîc»iridtpa»^*pourl*»proo;mm«tBASCaTiiur^atirMrupoui 
I* progran meurt en aatambttur. cet ouvrage de latence, ttt orjrrprat. 
t*vel* lou» la» atattt du CPC 
CODE MA 122 (427 pages) : 249 F. 

AMSTRAD CPC 464 : TRUCS ET ASTUCES (n° 1) 

LattucUehadvaa.Uf^tnvtdtipIcitaaon.IttloUraBASIC.IecvMari 
avec jovtlcfc, de nombran programme (getten de fcr»a» compraa. 
Mau de ton, généra tau de cataderet..). Une mne dt tuef pour le» 
rois d* tactjot. 
CODE MA 112 - (239 pages) : 149 F. 

AMSTRAD : GRAPHISMES 

ET SONS SUR CPC (n° 8) 

C* tria veut ta* découvrit l*t t>oa>tonn*l*t capectéa graphicjuM « 

sonora» d» rAmtlad. ■ en monte «mil» ruaUMon gtac* t d* nombran 

progiammea in «r «tara a uMate». 

CODE MA 124 (184 pages) : 129 F. 

AMSTRAD : LE LIVRE DU LECTEUR 

DE DISQUETTES (n° 10) 

Tout oa qu* Ton doit savon w k tactaur d* d Jouent» C* tVr* conéant 

auati. btai aOr. la DOS desasasmbia a commenté, un» geelen de Ictnri. 

un mari Bur dtaojue. in Osk Managa a de nombreui or ogranmetu«tiir»s. 

CODE MA 127 (208 pages) : 149 F. 

AMSTRAD CPC : Montages extensions 

et périphériques (n° 11) 

Pour tut ta» amatwt d'élactorsque Ce Ivre monte av*c d* nombraui 

schémas, tout otqu* l'on paitréJrta ai la mater*. 

CODE MA 131 (434 pages) : 199 F. 

AMSTRAD : le livre du CP/M (n° 12) 

Avec ce M*, pas d* ptobttma pour mal ruer ta CPtM. veut saurai rapide- 
mail tout aur oa DOS eitemamatt pussant : sauvegade. coew. mara- 
puaton da» Ideart. aramplt» d'urasason 

CODE MA 128 (224 pages) : 149 F. 

LES ROUTINES 

DE L'AMSTRAD CPC (n° 14) 

Pour bien oormake « ban uMtar It» 1 outra» tttm da» CPC 61 28. 664 
M 464. Un Im* I la para* de tous qui contait de nomcraui «1 «notai a 
programmas a un dttassamblaur 

CODE MA 143 - (264 pages) : 149 F. 

DEBUTER AVEC 

L'AMSTRAD CPC 6128 (n° 15) 

C* Ivr* ta» est* au débutant a opteue tout c* ouï laut savon sur la b- 



dda. {utou't rappranlsaag* du BASIC 
CODE MA 145 (209 pages) : 99 F. 

LA BIBLE DES AMSTRAD CPC 664 et 61 28 (n° 1 6) 
Ce Ivre de rMaavc* concerne In possesseurs n Amttad CPC 464. 664 
m 6128. Voua v trouver»; un» louta de tuct' Miptraablt» don un 
génétaau de masques, dés 1 cuvas, det aides I la poaammarjon. at 
CODE MA 146 (440 pages) : 1 99 F. 

AMSTRAD CPC TRUCS ET ASTUCES, 

tome 2 (n° 17) 

Parmi de nombreui tues pour Amstad CPC 664 et 6128 : ranarrte du 

svtttme tfaiptoutcfi du processeur, le GATE AftRAY. les narlact» ta 

contea) vidéo.. 

CODE MA 147 (220 pages) : 1 29 F. 

• NOUVEAU • 

AMSTRAD CPC-PCW : le livre du logo (n° 18) 
Cal ouvtag* parmeaa au tacaur de prol la au maiimuti du IOGO tvt» 
avec rAmstad. Ptinrapaui Mmet abordât : tas gtaphtamet. ta» procédurs». 
tas racursion». ta» routnat de li. un génétaaur dt masques, irucur» 
dei doméas. naligence attciele .. 
CODE MA 162 (408 pages) : 149 F. 

AMSTRAD : programmes éducatifs sur CPC (n° 19) 
Ce irre au un teouei oomplM d* progtamnvt* a dat^kcaéons pria I 
bvetema aur CPC Chaque programme ett ta taai ccmrranuarcuvrage 
couvre de nombrtm eujaa (marMmatqut», dm*...). C* tvt* M tout 

parlouratramvitdManaauirrcéai» 

CODE MA 1 50 (303 pages) : 1 79 F. 

• NOUVEAU > 

AMSTRAD : communications, modem et minitel sur 
CPC (n° 20) 

Un Amstad. un taépbone. un modem : la ccmbmaaon gagnai» pour 
alla dans U Wenulque Aspect néoriqu* : tacicnnartiait d'une tnar- 
laça RS232. norme Mdéoam. dttaipton du taiclonnaiiait du imiat. 
Aapect prstque : imxpkr, trun* «nalao» RS 232mriai. Ca ouvtaga 
est égalemant ifune grande uM» aui urJaataus dun PCW 
CODE MA 151 (206 pages) : 149 F. 

• NOUVEAU • 

AMSTRAD CPC ET PCW : la bible du graphisme 

Tout tur ta GSX. C* M* «tt un mua. Tout su la o/apritme sur CPC et 
PCW. Vaut v taxant notamment : programmaton d'un bdoa PAffT. 
grapriames de geseon {rtscgiammet.. |. aapràima» veesemé» Icnctov 
n»mai( et rtaataton tTun tghl pan. grapnJsmaa ai larvsaça ttuenirva El 
ai In. pou ta pranaie (dt. des «Creator» dates tur ta GSX 
CODE MA 181 (558 pages) : 199 F. 
CODE MA 281 (Livre * disk) : 299 F. 

UNIVERS DU PCW 
P. liai 

Enncmemantmataral. commande de CP V 3 ta Bi DOS. ta BIOS Idtai 
binai te. édrieur d» dsqueru». désassanbJeui ZSO. graptismes. cataoka 
lia loup» 

119 F. 

102 PROGRAMMES POUR AMSTRAD 
JOeconcfia 

Ce bvte. idéal pour ta dlbuant. va au t da ta* 102 prog/ammat dt aui 
guida le tacuur dan» raiploraton du BASIC Amstad Cas progtamma» 
couru a lacets 1 recopia sont dassés par nveau. diacun dan faisan 
appdldanounltacannassanots Chaque rmeau commença par \x» 
pratantalcn cta» nouvttta* ra luctons utatétt. Tout tas programmai 
sont oommané». Mustés dun «itmota daéarlon a lonctovart sur 
CPC 464. 664 a 6128 

CODE PS 222 (248 pages) :135 F. 

SUPER JEUX AMSTRAD 
Jf Sarian 

O»jajidad*»w.deréttaiion«dehasadpouramattuid*,irvt»qi« 
vaut maltisa raprdemait I* BASIC d* rAmstad L* lectaur appran) a 
crjnatwe cta» programma» da plut «1 plue comptaia en l'aidant de» 
ctirimaxaetderauraueidtlalriMdnvaiabtat iMrnmiumtau»*». 
ta granoule. ta sapent internai, la chenle. aie amusaont ta léctw tout 
ai laaltanl son apprailasag* 

CODE PS 257 (240 pages) : 140 F. 

AMSTRAD EN FAMILLE 

Jf Sahan 

une sétacton de 40 programma» pour la maison louchant a sept domaines 

tas biances. ta pédagoga. la curant, ta» taui. ta temps, ta santal» trccUge 

a querquet utliBia» Chaque programma est accompagna d un oroar» 
gramme. d'une lue de» vaiabla» »l dune aiplcalon de chaque ligne 
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BASIC. Pou ramatau iri* au BASC qui vaut commanear i program- 
mer arleaoamant. Pour CPC 464, 664 at 61 28 
CODE PS 240 (24u pages) : 145 F. 

PROGRAMMES UTILiïAIRES POUR AMSTRAD 

ItAcftnMI 

Nombrauut rouan* : ulluias d» programma Ion. mirai* grapraqu* 
la gataon 0* ld*r». utUrw imprimar»» : 
110 F. 

APPRENEZ L'ELECTRONIQUE SUR AMSTRAD 

P. É*»io\ S Dtspmtr 

Programm* parmaunt d» viauiwr Im phénomèn* complsm d* 

raatctoriqu». 

95 F. 

COMMUNIQUEZ AVEC AMSTRAD 

D Bonomo. E 0*rw 

Pour tout I* pjuwnts (Tondit couru», codag». daeodag». raoepaorv 

«minion.rourUoM.115 F. 

AMSTRAD EN MUSIQUE 

QUsMratV 

Cal ouvrtg» M permatte a rufttaliu. daja irai* a) langaga BASIC. la 

taduefen (fduvr* muëcalw tu Amstrad (464. 664 M 613). Parart 

o.la5«r*a»wo»«3<^trpat»^parl«syr*«t»«uiT«jtioalprog'irri- 

maB«.l«l«w«tlarMnèaï*r«tlo»v«(<pp«rl«ins»uc«onsBASC 

contacraas au ton 

CODE PS 324 (244 page») : 165 F. 

CLEFS POUR AMSTRAD PCW 

D RoftJ-J. Wtytr 

La giiot tnrjapanubl» «a ruthtatru «a PCW : I lai» tuooatatvamtn 

du BASIC Ualard. LocoaoW MuMplan. dBASE «HCPM PU. Pou dnaqu» 

langaga ou kjgkM aoni oonnét Mt Owtrtm oommandat ou Inttuctcnt 

« ma*ag* danau. D* ««mplat t appicalon « un Mai par chapr- 

ta complétant rouvrag». 

CODE PS 375 (240 page*) : 215 F. 

GESTION SUR AMSTRAD PCW 
J-UJtolA. Garpadarmac 

Cad au livan tfapplkaaom d» g»t*on conotmart lu PME « lat pro- 
Matons Obérai* qua ton tudat toit logea* complamani** utlsa- 
H* tu Amtrad 61 28 al PCW : locoacnpr, logerai d* taitamatil da tsx- 
tat. dBASE II. logroetd»haaur3»dorrr*a;Mut1pl*i,tjb1 au La. modelas 
al uttwui da bord propoa* «ont da dflouM ooaauntt al pauvant a»a 
adaptât i raid» «at comrtvantatr* daa autrui 
CODE PS 347 (232 page*) : 175 F. 

TROIS ETAPES VERS 
L'INTELLIGENCE ARTIFICIELLE 
POUR AMSTRAD 

R Oucampt 

Cahiai^oilal«taaao*riiiangaric»arli«oWadalao3n«m(<«al 

pratqu*. grto» a da nombraui aiampl* al 27 programmai BASIC qui 

uataani routa» I* raatouott da rAmtltd. La racrau Mat au BASIC 

atudara rrnaraganot art Idana a tavart daajaui puis I apprandra a o*r 

4a pat* tyMmat aipwa. 

CODE PS 278 (260 pages) : 160 F. 

PROGRAMMER VOTRE 
TRAITEMENT DE TEXTES 

J-C. Otscona 

Trammant da tant» prêtant» pou rataantal an ataamblau. Pour 464, 

664 al 6 1 28 mit au potn I a*c un» DMP2O00. 1 paut tadtarnan I Ma adapta 

I faut* Imprimant» 

CODE SY 221 : 128 F. 

LOCOSCRIPT 

ai* Ou 

C» M» ad un» intoduefon al par ta démardha pèdagorjqua. I veut par. 

maca un» dacouvari» aM» M rapid» da oa taitamani d» watt. C'ait 

auaai un ouvtaga da ralaranc» auqual vaut pourrai veut raportar al un 

guida pratqua. 

CODE SY 195 -82 F. 

ASTROCALC 

GOanc.P. Oasraotoq 

SI vaut aouruta rjtpoaar d'un ou* d» calait ptvmatttnl laurborMon 

d'un tram» natal ou «\jn» ravoiulon tout», la compar «ton d» Mm*. 

la ratntteh» aulomatqua d* tansB •< progrtak» but an comprananl 

laa macanrtmat mi» an œuvra Alors cal ouvragavoutoomblara 

CODE SY 162 :148 F. 

PERIPHERIQUES ET FICHIERS SUR AMSTRAD CPC 

au m* 

C» «via «Ut» la programmation an BASIC d* adniars al dat paripharquat 
LM ordra» car ««pondant a dMcun d* paripf*iqu« uni praaantVt : 
lacaut d» caataaaa al da daquaua. rmprimanl*. crayon opaqu» manant 



da (au al RS 232 La programmai on da» rjtqua» ail «u<i*» an ace* ta- 
quaniai a raid» d'ordr* BASIC M an ace* Atct a rak)a da routnat ai- 
ginal* L»radaur ddl data bian mal lirtar I* inatueson» d* baa» du CPC 
CODE PS 316 (168 pages) : 120 F. 

AMSTRAD 3-D 

J.P. PHI 

C»t ouvr ag» conl anl un variât* logerai mon tant tout* l« atap* n*o»t- 

tavw a U oaalon r/obj»* al a laur vituaitaton an toit dinamient t 

rtoan. On apprend » oraai un» ribhc4l4qua tf objat» al » h*» daplacar l»t 

un» par rapport aux autw al mam» a I* Incorporai dam d* jam tfavanua 

Oa«airi<^omrïoy«a»vatald*datranidaaanrMnnalarrlr;atainlar 

rapidemanl la ti<*nrqu» «t U rjrogrammaSon da IViag» an 3 rjmantrom 

tu Amtrad CPC. 

CODE PS 365 (264 pages) : 195 F. 

PEEKS ET POKES DU CPC 

Commaniaiptalaralond ton CPC aparlr du BASIC? C'ait oaqu» vous 

rtvtl» oa lw» avac DU c» qu» tout tav* tu lu paakt, pokai « aut* 

caI...Vajttau«auascomm»ntwotagarlamanx)ir*.caKul»«nan«», 

« eut cala t* bdamart. Un panagt ataur» at tara douwjr du BASC 

au puttanl LANGAGE MACHINE. 

CODE MA 126 (200 pages) : 99 F. 
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MINITEL 
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LES SECRETS DU MINITEL 

C. ravamiav 

Prnopjui tfiaprtu : Mt «tanna tante* proport» u TaatW. rntor- 

maaqua domutqu» at mWtal. talaphn* »t larwriauton tfnrormatont. 

I* drltarantt prindp* d» tantiormalon d» doma*. commanl davani 

tamur. r tarai l ton rrun modam uvXraraat. 

CODE ER 491 (168 pages) :120 F. 



GUIDE DU MINITEL 
P. GuauH 

(X»p«u^appor*?Ou«lt*rvV»at»o^prii?Comm»ntr»dura 
ta» court tant dminuar la qualU du tarvk» ? En tout» ndapandanot 
vit-tirit du PTT.PariokGuau»» répond aottqu»taont*ta bian (fautas 
dan» ot pat*, guidi lawnlal amant pritqu» 
CODE ER 504 (96 pages) : 85 F. 

VOTRE ORDINATEUR ET LA TELEMATIQUE 
P. Ou** 

LV*rmat*»hd»«jalaatltouv»rttvrwrivm»d'ln*}matqu» - tor^ 
La «amilqua. qui parmtt la oomrrwricaton anta orrjnatiun, britaow 
rtottmanl al ouvra du parspaetna pattionnant* DIttanbi movara, 
comm» ItaWpnon» ou UrarJo. ton i vota port* pou raal tara» aqui- 
parrwntt d» tantmiaaion daerrs dant ott ouvrag». 
CODE ER 487 (128 pages) :90 F. 



DIVERS INFORMATIQUE 



• JOUEZ AVEC MOS 
Edoya/*r».40F. 

• MIEUX PROGRAMMER SUR ORfC 
UdiéAntwvba* 110 F. 

• COMMUNIQUEZ AVEC ORIC 

Oar»s8anomoa(r?(WrOur»rr« 145 F. 

• INTERFACES POUR ORIC-1 ET ATMOS 

U Livra/. -59 F. 

•ORIC A NU 
fibha Bnxtu 151 F. 

. PLUS LOIN AVEC LE CANON X07 

Mo-*G4rVnr?A 65 F. 



(?F 



PRATIQUE DES IMPRIMANTES 

KMkaaftatra 

Apprandra aut amalaut comm» aux prokaronnalt t raioudra 

•tt ma» al un pronam* oj/lt n» manquaront p* d» ranoontar 

tort d» la mi* an aarve» d» Uu imprimant». 

95 F. 



% 



^ 



PROFESSIONAL 
STANDARD 



CODE 

G U 4010 



ATARI 
AMSTRAD 




179 F 



QUICK SHOT PC 



CODE 
GU4022 




175 F 



ECONOMY 




69 F 



CODE GU 7005 
ATARI - AMSTRAD 



KONIX SPEEDKING 
CODE GU 4007 



149 F 




ATARI - AMSTRAD 
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ETUDIEZ BRANCHE ! 



LOGICIELS EDUCATIFS 



APPRENDS-MOI A LIRE 

Activité* de prélecture tn maternelle 

A partir de 4 an* (tynthés* voc«l* en option) 

EneemoS» tfactvfaM dattnte» i mate m place Im prt-r «qu» an mil*» 
« lecure Lm curdCM utaent In tancton» graphique» de rordrvaaur 
pou hvorit» I» devetoppamail de la reprttenpjton «Mk-iampcr*», 
du tchtma corporel, du console de lac*. « la mtmdr» al » la techa 
die drdce». La» consigna» dutKalcn «ont dorme»» août brm» va- 
ta* griot a dee meeugee reetta» par la i|nMit vocal». 

M05, M06, TO7-70, T08 (Réf. PS 4 1 00) 2 K7 220 F 



DNR (Réf PS 4068) 



1 disk 285 F 



AMSTRAD (Réf. PS 4220) 



1 disk 255 F 



T08, TQ8D, TQ9, TQ9+ (Réf. PS 421 9) 1 disk 285 F 

APPRENDS-MOI A LIRE 2 

Aid» à l'apprentissage de la lecture 

Grande section - CP (synthèse vocale en option) 

Entant» i actvMs progretatva» pou pana data navres» a la lecture. 

l'enfant M aman* a parcourir un v#i latte ajbun sonore inuracll : pKa 

da 200 mo» aonl procostt an contai» ou par r sfaanoe i d« «nagea « 

du aon. a tavat lofe tarnes : la campagne, la voyage, a conta. 

MQ5, M06, TO7-70, T08 (Réf. PS 4101) 2 K722ÔT 
DNR (Réf. PS 4189) 1 disk 285 F 



AMSTRAD (Réf. PS 4222) 



1 disk 255 F 



TQ8, TQ8D, TQ9, TQ9+ (Réf. PS 4221 ) 1 disk 285 F 

APPRENDS-MOI A ECRIRE 1 ET 2 
Aide i l'acquisition de l'écriture 
Grande section - CP, CE 

Lepon décrirn aasilte par ordnaku : oal ou* parmal a reniant da tfo- 
detw aon tac* an bneson d'un» paoapSon vtaua». l'acaiatjon daa 
acharnas da 'tenue aat tongu». ranlani procéda par «tu» al arraurt. I 
a 4ctl *j IHonnamani, au riajuUamant.C* logo» lèvent* la cemia- 
lanot du cbMar atohanumtriqu». I «tant an oompfemant daa manuels 
pour parmana la bnesonnement da Talatar cf totur a". 

M05, M06, TO7-70, T08 (Réf. PS 4102) 2 K7 195 F 
DNR (Réf. PS 4191) 1 disk 225 F 



AMSTRAD (Réf. PS 4199) 



1 disk 200 F 



T08, T06D, T09, T09+ (Réf. PS 4223) 1 disk 225 F~ 

L'ATELIER DES PUZZLES 
Construire et résoudre des puzzle* 
Grande section -CE2 
Mettre» 

Un programma da Jeu qui propos» au Iota/ 1 00 puzzle» prtts a remploi, 
«me parla 

Un tdseur parmal da ort» da nouvaaui Sonars da puzzle*. Caa Dcnlari 
peu»m*»econtssj*» an ptutaut étape» avant d»t» proposé» au pro- 
gramma dajau. 



M05, M06, TO7-70 (Réf. PS 4065) 



2K719SF 



AMSTRAD (Réf. PS 4229) 



1 disk 200 F 



MOTS CROISES MAGIQUES 

Entrainement à l'écoute attentive , à la lecture, à 

l'orthographe et jeu de vocabulaire 

Grande section - CE2 (synthèse vocale en option) 

Un programme pu proposa™ 16 grtlaa 1 rtsoudr» P»j«i«ur» adrttis aonl 
poeaWe» : rampV le» grHaa avac ou tans rade du acn. rienendasen ou 
non da enaqualant Celogical favoriaa l'appranltiaoa da la lecture al 
da rotographa ■ connu» une aaayame Hseson A rufttaaon du da- 
v»r abhabetque Au total 21 6 mo» comltianl un tadqu» dda bat» pour 
utanfanaoeSteans. 

M05, M06, TO7-70, T08 (Réf. PS 4103) 2K.7195F 



DNR (Réf. PS 4209) 



1 disk 115 F 



AMSTRAD (Réf. PS 4208) 



1 disk 175 F 



TO8,TO8D,TO9,TO9+(Réf.PS4210) 1 disk 195 F 

AIDE A LA LECTURE 
CP(1)5a9ant 

Famte : daaaar daa mon par ca «forte pour tantalna i la lacajre rapide 

et « la oomprarara en logique 

Lacajce^ pour t awana i la lacue Oendame et évaluer la ntvaau de 

oonprehenacn. 

M05, M06, TO7-70, T08 (Réf. PS 61 65) 2 K7 1297 
CP(2)5è9e/ts 

Memc-jeu : pour aaaoder mon at Image» ou phraaaa et Imagée. 

Loto : une Maton a rortiographe d'usage al granmtlca» : matcuen- 

Mmnh. v*/jM-#rml 

M05, M06, TO7-70, T08 (Réf. PS 61 66) 2 K7"?29T 
CP/CE(1)6à10ans 

Alan» : awakwmanl* la acurt MteaV*. 

M*mot r«conistjecno^»ito court rxurappre^ Ion dee ttuctj et 
de taiM al eus» de I ortiograph» 

M05, M06, TO7-70, T08 (Réf. PS 6167) 2 K7 129 F 



CP/CE(2)6à10ana 

P«l»ni*le : remette an or4e la» me* et de» arpretdont, pour mieux 

comprendre o» qu'on IL 

Radar : reconnattanc» de» agnet de feenur» 

MOS, M06, TO7-70, T08 (Réf. PS 6168) 2K7~Ï29T 

GRAMMAIRE ET ORTHOGRAPHE 
CE (1)7 à 11 an* 

Mou odafe-image» : anianemenl au vocabuuJre al » I ortrogr aon» On 

rampa l«e grUee avec la» rnaga» propottoe 

Accord part»» : appranlsug» daa réglée d'accord dam la phraaa avac 

Images a l«genda 

MQ5, MQ6, TO7-70 (Réf. PS 6169) 2K7129F 

CE (2) 7i 11 an* 

D»vh» : (au O^JanaScaton de» phrases leor» par M». 
CorSugaaon : da» Image» et de» phraaa» I oornpMar. 

MQ5, M06, TO7-70 (Réf. PS 61 70~ 2K7129F 
CE (3) 8 à 12 an* 

QrapNi : apprendre le» dHaranca» ente roral al rtcHl an uMaant la» *■ 

gnaapnonttqua». 

Conjuolc : combinat dMrank «ttmanaj pour reconaSbei daa vartSM cor- 

leoarrunl cenjuoj*» 

MO5,MO6,TO7-70(Rôf.PS6171) 2K7129F 



CE (4) 8 à 12 an* 

Accord ? D'accord ? : accorder art partdpw patata avac ht» rnaga» A 

legendar. 

Bourea au voyete» : |au o*ortMg;apn» d'usage et de vocacuute 



M05, M06, TO7-70 (Réf. PS 61 72) 



2k7129F 



AIDE A L'ORTHOGRAPHE 
CE/CM (1)8 à 12 an* 

Invaeton de» tautoe . Idanllar lapkJement le» lauM et tvitor da leeiatate 
k+m dm phraaee combner dee moB et dee «ipesacr» pou lormer 
de» phraaa» et dea tut». 

MO5,MO6,TO7-70,TO8(Rèf.PS6173) 2K7129T 
CE/CM (2) 8 i 12 an* 

Mot» a deviner : A par* du conta», retour» » tan» et rorfngrapne 

dunnwt 

Po-Ktjaton apprendre > u**« le» pmdpaui lignaa de poncuaton 

M05, M06, TO7-70, T08 (Réf. PS 61 74) 2 K7 1 29 F 



GRAMMAIRE ET VOCABULAIRE 



CM (1) 9 i 13 an* 

La priât» »! ta» conaJUan* : Idantmv le» «Amena de la pnraaa par 

reducton, anafyeo at combhaiaon de oau-d 

dwieU avant! : raoonaltjtr I» mot ai caretpond i une dMnj ton ( avec 

ouianadicSoTuJrel. 

MOS,MO6,TO7-70,TO8(réf.PS617S) 2K7129? 
CM (2) 9 à 13 an* 

Le» pronom» : aoquert le» mecaréynee d'uettaion da» pronom» dan» la 
pnratt. aataamani atanatMepue : apprendre A daaaar la» mok par 1 . 2. 
3 ou 4 lelrw commune» 

MO5,MO6,T07-70,T08(réf.PS6176) 2K7129F 



VOCABULAIRE ET ORTHOGRAPHE 

CM (1)10 à 14 an* 

A demi-mol : amAtorar le vocabulaire al rortngrapn» al .. a» tank oor ■ 

rectamant du desornav» 

API : ce<» mtaton A ratonaoel pnonttque IrtamatonaL larnaariaarenlani 

avec let dltkence» ente rteril « roral. 

MQ5, M06, TO7-70, TQ8 (réf. PS 61 77) 2K7~Ï29T 
CM (2) 10 à 14 an* 

Svnonymee et cor»*ea : recomalre le arnonvme ou le colla»» oVi 
mot avec ou «an» rMtrenc» A un cents » 
utmot» : reconiaMon d'un tn» long, pour rappropriaien daa ttuc 
Ue» de recKI m de rorhograph» 

MO5,MQ8,TO7-70,TO8(réf.PS6178) 2K7129? 
FRANÇAIS CP/CE 

1 bddan Natun-Eodat pour rapprantaeage en acua. torture et orf» 
7*pha : Mtmo>u. Lolo. AJana.PAUxnAw. Radar. Ak»« de» pnratea. 
«co aoutktAnaga» PonctjaSon. Claaaemeni atonaMiqua. Cnatu u 



DNR (Réf. PS 5003) 



1 disk 270 F 



FRANÇAIS CM 

10 kx>cW» Natian-Eoda» pour ceneoto» as acqu» an ortwgrapn». en 

grammaire a an vocabulan : Devr* Grapho, Invadon dee laua». Moa 
A devina. Con|ucaJc Laa pronom», La phrase a «ee oonastiana. Boute 
aui vovetat, A demi ai oc Svnonvme» a cent ara» 



DNR (Réf. PS 5007) 



1 disk 270 F 



FRANÇAIS ECOLES 

Recoupement da» a loddert Na rurv Eco»*f r ancat 



DNR (Réf. PS 5035) 



2 disk 756 F 



AIDE A LA LECTURE DU CP au CM - 5 à 10 ans 

Sboj<iekr4af*n-Eocate Fans*, leo». MtmcHeu. Loto. Aiem. HSmot 
Pta-mAJe, Radar. 

TO«, T08D, T09, T09* (Réf. PS 20004) 2 disk 320 F 



GRAMMAIRE ET ORTHOGRAPHE CE/CM 
7à12an* 

SlogirM»Narujr>EcotM: 

Uos odtêe-nnaget. Accord partait. Devhe. Conjuga»on. Graphli. Ccn- 

beat Accord 7 

O accord ? Bourse au wy elle» 

T08, T08D, T09, T09+ (Réf. PS 20024) 2 disk 320 F 



AIDE A L'ORTHOGRAPHE CM 

8 à 13 an» 

S todde» Nattan Ecole» : Aata dea phrasaa. Invasion daa tauaa, Mo» 

A devrra, PcnctjaSon. La phraa» « ta» ccnnuanti Chant» eavanm 

T08, T08D, T09, T09+ (Réf. PS 20044) 2 disk 320 F 



VOCABULAIRE ET ORTHOGRAPHE 

CM'Collège10è14ans 
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6tco)a»»Nii\an-£co»« 

Lm pronom», Cttaatnant akpnabMou*. A dertVHTK*. API. Svnanyma a 

ooradra kaamoe* 

T06, T08D, T09, T09* (Réf. PS 20064) 2 disk 320 F 



CHIFFRES ET FORMES CP 
5à9an» 

PiutwuiJ» : touva « coda un chemin tur un quadr*ag* pour mena 

un oa»*i a ton rtd ou un ba*au l ton port 

Pus» : r acomatk» « lemataj* ta ktujga 1 par* d'un tMcoupag» 

«nptlaoarrl*. 

Moka - Avant - PU : Mu* I* nombre daleman» d\mt catalan « 

comparer deux cottctoni tfoo)(BL 

Camp» : coda a* nambt « uaw k d'ab»i» d'un* cotaton augmav 

Uni ou oWrtunt r tguar enant 

M05, MOS, T07-70, T08 (réf. PS 61 60) 2 K7 1 59 F 



TABLES ET FRBES CP/CE 

6 à 10 m 

Raa : a*m d» tota Ma» M racomifct Mur» «tmai a d» eynvtn* 
pou pouvoir anal» M» rare», la modar. M» agrandi ou la knprtrtva 
Symdna M Initient : touva 11 Igure Intatt*. vu» dam un mldr 
ou ivwl Bum» dun daml-iour aur un quaohlag» 

TabM» dor*afcra : r*mp* un* at* daddajen. d* eouaacton ou d» 
rnukapécatan d* nombra a un chine 

Cbaernanl : rhmr da et»»» ou da patonnjqga dam da cada» 
«don da erMre» don** ou I d*M ad-mam*. 

M05, M06, TO7-70, T08 (Réf. PS 6161) 2 K7 159 F 



CALCULS CE 
7 è 11 an» 

Rang* da nombiM : ranga da eraart at da d*dmaui du pka p*a au 

plue grand ai la etaga d'un grtnt-dd. 

Car» magtqu* : oompttar Im cum dun cane (4 i 4) d» maHra a o> 

qu* !•• eomma d* ahtqu* cdonn* tdant Igatoa 

!r*»*ondaahirta *fl*clj«rrnr*j»em*r«MrJuedor*ralOTipotari*M 

!♦.■,«. )»vartayda n'atteignait l«ba de recran 

UuMcataa»«n«»»otomaI»itf«U«»Jw»^daUrmj«atoaan 

«en* m anaetiM pa a pu (cm l*> todw du calai 

M05, M06, TO7-70, T08 (Réf. PS 61 62) 2 K7 1 59 F 

RANGEMENTS ET REPERAGES CE 
8 è 12 an* 

Produtj « aurtacM : mon»» la ratafcn anl* la aurtao» d'un racong» al 

Mprodut d*d*ui avare a un ou dam ch'*a. 

QuKtHao* pujca « r «canna»» un pal port ou un* Igure aur un qu* 

Mag* grlo* I da coordonna*. 

Ayanl « Apra : ton* un nombre. )ua* avant au (un* âpre* un nombr» 

dom* *t a amBanl par un oNt* donné. 

Combiiaiaona : dvd» la «Mmana fin ptyvag* al dacoovnr «xi» la 

ptyttga poaHa tac dan, toit ou ou*» eleman*. 

M05, M06, TO7-70, T08 (Réf. PS 61 63) 2 K7 1 59 F 



GEOMETRIE CE/CM 

8 à 12 an» 

OrotM : vo> M r*œnru»e rappanananc* d* pdnt» a da tcw I* 

paraaam* « la parpartfaJara d* dan dreta*. 

TitengM» M ojaoYlaara : raconmk* a oonaut* da carra, da reo- 

langta, da loaangat, da pvaMogramma a da tùngia * jn ktat, 

•quMraa ou recangtoi p*r dèpUcatvanl d* au eommat 

Angka : vdr a racoman* da ucauri d* 1 0». 20*. 30-. ittr « «note 

la aa>M d\m Manjb. 

Gofl . approcha puh atandr. un* oH* an tvduant da angla M da 

ilaai ma atan un* tohta doma*. 

MO5,MO6,TO7-70,TO8(Rél. PS 6164) 2K7159F 

NOMBRES ET OPERATIONS CM 
9 è 13 an» 

Drv»dvccrrip'trvi»u»chr»qu»hae**»*^ 

■pu» da tcuttactont auccaarva 

Acoaon - Sauuacton : arexua m*nU«m«rt da addten* a da icua- 

racton* «en a* an tgn* - uv* *ctvll»|ua)U'a tora)au*u*. 

Un a «orta un nombr» : paar d* r*olu* an *aa k r«cnu* *n ohllra 

a Invauma» pour la nombre* d* 3 a 1 2 aNIta. 

Or** d* grandaur - hUlptcaton : plaça I* raautkl oTun* rnuMpicalon 

dana M bon hava parmi la cjja»ncix*a-ur»ac»vl*ju»Qu'ad*ui 

jouan 

M05, M06, TO7-70, T08 (réf. PS 61 58) 2 K7 1 59 F 



MESURES ET GRANDEURS CM 
10* 14 an» 

Aia a vcèjrna cafcuaa. à par* o\i» Igur» M av*c eu tara tomua, 
da painvara da aurtaca a da voama 
Changamani o"un*a : nraJornar da maura d* longu«urt.d**urtaca 
ou d* votana dan* «tararaa unltt* grk* I un attau or donn* 



Uaax* du tano» : appranrta a ban addlcnna *t Uan «xiïa«» da 

dura* an haure*. mtnua* a aaconda a par* da aapa dura court* 



Lhéarta : découvrir Ma ragja d* propcrlornai» (adoWon*. aouMactcnt. 

cambirwjtam. rtg)a dt rat) a par* d* Muions pr japua 

M05, M06, TO7-70, T08 (Réf. PS 6159) 2 K7 159 F 



JE SAS: SCIENCES CM 

Programm* élèv* Un ou dam jouan pauvan itratar aur da 

guatonnala parant u la poti» prlncapaji du progranm* daacda 
•n Soanca phyadua « ScMnca nabraa La Wart aont «an- 
ataa grac* au programm* proaataaui. Lafouaun pauvtnt obtarw da 
aida *?*a*qua M h* un commantaira o"acoomrjapjramant 
Prog<*mn»ryo<« «* vMJfUnac»aj»a*tJt>»parma>rar»a»»ni 
MataU-m*Ti*auBritd*9J*<lan«aayli*aaY».d*wprcpoar 
aa»«l»vaaÉi»anlrcampad*laprogjaaond»udaa* 

3K7159F 



MO5,TO7-70(Réf.PS4071) 



DNR (Réf. PS 4073) 



1 disk 265 F 



LE SOLEIL ET SES PLANETES 
lOàltm 

un voyag» dan* I* atiam* aotara . EnM Vanui a Pkrtm. dtoouvr*] 
«juta u* pbnMa du SoM «Mura tataNa Au> commanda d* vot* 
vanau apaU. approahdvou* du td d* Jupar. Mail pour rapar* va» 

vol* proonan» «tapa. r*pond*2 1 duakjua quaion*. Survint vonnVaau 
6* ixnnjhsancM. voua poumu rouva la rtpona dan* U «ch» cjj vou* 
at indtou** (dtbuant). rachaoha Kremant dan* h bu* d* donna* 
|oor*m«| ou ratr» appa I ««• mam*» (a pan) 
C* bglaa d* amiaton al I la ba un yu tfavavu*. un* d*oouv*o» 
troamjlqu» du tyoèrn* tou*» « un* hllaion I U ratante documan- 
Ur* I pâma I tuNuaur rvtophy» Cariant prograar«*m«nl tm corv 
naJaanaa *n awanorrw. I al aoM mpaon* d\jn «naamcM Important 
dt dama» a d* qualcn* ou» Ton peut c omplaMt g/ac* I un *dfeur 
tpadaïa. 

T08, T080, T09, T09+ (réf. PS 4253) 1 disk 225 F 



DNR (Réf. PS 4279) 



1 disk 295 F 



JE SAIS : HISTOIRE -GEOGRAPHIE 
EDUCATION CIVIQUE CM 

Programma étiv* 

Un ou daut jouauri panant nVatar aur da cjuatcnnalra portant u 

Ma pana prtndpaui du programm* da «cela an Hoo»» 

G*oor»pN* a Inaucton CMou» La achar» «ont aranatta grao» ai 

programm* protaaur. 

La jouaurt p*uv*nt ebank da dda cpadtqua a h* un oomma .M* 

(TacocvripagnananL 

Programm* pro(*tt«ur 

Un td«u ta anpap*rm*<ll'*n»*«y»ld«aaiu-m*m* «jtarv. d» 

quatonnata qui M data, d* Ma propoar t a* a*va atn d* ar* 

cempt* d* la prog/ataon d* u daa*. 



M05, TO7-70 (Rél. PS 4074) 



3K7159F 



DNR (Réf. PS 4076) 



1 disk 265 F 



CARTE DE FRANCE 

Mer», flouvtt, vlllt* *t monUgnM 

Apprandra I oonnatl* la Franc*, aa v*a. aa a uva. la mat qui 

ranloura». a* montaga l*urt nom» M avj-t aajakrtt. Apra chaoJ* 
apprtrataaga. un|au«n»a»v»l»riani»i*cannall* rapfcJarnanilapnn- 
apaui **n«no gioo;apr*3ua d* no»* paya. 
Crayon opaou* otkoaar» 



M05, M06, TO7-70 (Réf. PS 61 27) 



1K7 99F 



AMSTRAD (Réf. PS 01 27) 



1dtsk165F 



CARTE D'EUROPE 

Pour conmitr» I** 27 p*y» d» l'Europ* géograpfilqu* 

La daii para* d* » logioa pamanrort : 

-daëlar 27 pay* a c apiu la 13auv*a, S maalh irwnugnaui. 13 



- d* |oua cent* un paranak* (ou oont* roraVuauri 
MOS, M06, TO7-70 (Rél. PS 1702) 



1K7149F 



AMSTRAD (Réf. PS 1226) 



1K7149F 



AMSTRAD (Réf. PS 0226) 



1dsk220F 



CONJUGUER 

Ou* p*daooglqu* dapptanratag» d» la oongdacn. ca togKja pamad* 
raxnnatt» BuM* Ma kxma oontca* da vota lança* Tout Mi ca 
parlcutar» (audUra datadli. pcranvhaui. inpaaorrva t . *t) ont M 
la]»)*. Caa tgianamd un ou* da <*1tcalcn a d* cmtoton crtwgra- 
pNqu* 

TO8,TO8D,TO9,TO9+(Réf.PS0001) 1 disk 295 F 



MOS, M08, TO7-70 (Rél PS 6001) 



1K7195F 



AMSTRAD (Réf. PS 5001) 



1 disk 285 F 



COMPATIBLES PC XT (Réf. PS 65001) 1 disk 295 F 



APPLE H, II*, le (Réf. PS 60001) 



1 disk 295 F 



TOUS AU DICTIONNAIRE 

A l'aida daxadca M da jaix, k McMur t'antaiw I U oonauMon par 
a*»alpr»b*lov*.d*niM»mt«^dudrtar«i»«.*4ilar»apljnda 
«»av»iUlog^Lipam«d»oorr«i*n<»alalona»oni^d*l»TaKn»a 
da «lampat *n Ml cncèùaur» u-mlm* I par* d'un mot 

TQ8, TQ8D, TQ9, TQ9» (Rél. PS 1002) 1 disk 295 F 
M05, M06, TO7-70 (Réf. PS 6002) 1K7195F 



DNR (Réf. PS 0002) 



1disk295F 



MOTS EN FETE Mm* -2nd* 

3 (eux d* vocabulaire *1 d'orthograph* 

3 Mui d» vocabulat • a dortiogr aph* pour r*vaat Ma mot» qui domvanl 
dan* Mt tVa*. L* mol a put long. Anagrarnmma. M pandu. Chacun d'aux 
oflra ofvar* nrvtaui. du dibuunl ai vtuoa. «da a comrran u lra ar»- 
mant rartvl». La didamjira dant laqua* a puaunl aaatolrantnt 
(Mettant 80 000 me*. Tout» la Mmu d* la langj* imçafa. 

COMPATIBLES PC (Rél. PS 4320) 4 disk 325 F 



ANGLAIS POUR LE BAC 

2nd* - Terminal» 

Prtpmtcn nvMwdiqu» ma épreuva dangjal» du baocatauat a da 

concoure dama aa granda aceta Wlwd* : rlltor*. ladura. a 

oomgtf.rtara.L'tajdMrt^aWailadukaajrvglMumphraalancaB* 

Sa areur* ki anl aVjrvavka tu k> at I mtar» I aa aman» I rater . a 

poar da guett ent , a ranatontr ; M logoa ki propoa t tout momtnl 

un court da ç;immjlra, da «adea dappktton auatanl I* port tult, 

un icêcrrÉn I2O00 mon) »t da ada pon em a 

Lt Ivret dtrxamptgnamtnt propoa un 'guide dt rMjdanr qui pamvM 

un* rtvMon I a car» an Icnclon du ntvatu a da abjtoat» propre* I 

crutqu» aujman , S> ajout) un 'gjld» dt raittignanr pour futHalon dan» 

M cadre du ooure dangtar*. 

COMPATIBLES PC (Rél. PS 4323) 1 disk 460 F 



BALADE AU PAYS DE BK3 BEN 
Mm* -Se m* 

Aie* krvla r*l*v» au ptyt d* Og Ban dan* quala epkwda htpka du 
roman da Le**» Card. Cet» nvatiode original», londa eur un* ptdagogj* 
adv* al un ctoalant ou* d* partictonnamanl I oomprend da kat» dt 
oornprananaon. d» grtrvntt». de vccabUaki, da i*»*ian» du progr a mm». 
0* pka. un* bande auto Mtgnk* pâma rtcou» da ara» an angla* 
(Ed»ona Cota Vaon) 

TQ8, TQ8D, TQ9, TQ9+ (Réf. PS 10009) 1 disk 250 F 

1 disk 225 F 



AMSTRAD (Rél. PS 50009) 



COMPATIBLES PC (Rél. PS 0153) 1 disk 280 F 



DNR (Rél. PS 01 75) 



1 disk 285 F 



ENIGME A OXFORD 

4ème-3ème 

L'INgmt ttrt de prtart* au ptrMclonnamanl de la langu* angtaa : apra 

un an * d* ptuaaurt paga da qutttdne. un ddomak», da r appa t a 

da artrdca dt prammdr» aont propoa*. antiaoupa d* meta oottÉ». 

L'approch* du programm*. » r*al* quaMt du g/apréim* a dt rtiaouton. 

la poeabltM ifmprkna. dan an»» M ta» eur la bond* audlo. *n «ml 

m ouf Idal pour M ran*c*onn*m*nl a a mafete* m la langu» anglara 

(EdllavCokMVWan) 

T08, T08D, T09, T09* (Réf. PS 01 12) 1 disk 250 F 



AMSTRAD (Réf. PS 01 14) 



1 disk 225 F 



COMPATIBLES PC (Réf. PS 0124) 1 disk 280 F 



DNR (Rél. PS 01 77) 



1 disk 285 F 



ENIGME A MADRID 
4» m» -3e m» 

L'Intgm* an d* prtMr.» au rartaclarviarnert d* U langu* apagnol* : 
apri» Meure dMn Ma» tuai d» ptuewjn paga. da quatdn*. un te- 
•omakt. da «p»ca»cra M da aadoa d* jtitmaka tant papae**. 
Le bgWa *B drvM an quai* *p*oda artnoouptt d» mon adta I 
au cctatM d» tourna la paga' du aria, dt ranandr* u un bande 
audto kiHgr**. d* nmonma. Pa a oonvMa»*. c* logkia «u un «oel- 
an ou* pour la mailla d* k ktngu* aptgnde (Editant Ccttal VWon). 

T08, T08D, T09, T09+ (Réf. PS 01 49) 1 disk 250 F 



AMSTRAD (Réf. PS 0151) 



1 disk 225 F 



COMPATIBLES PC (réf. PS 0152) 



1 disk 280 F 



DNR (Réf. PS 01 79) 



1 disk 285 F 
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ENIGME A MUNICH 

4* m* - 3»m» 

l'srtgma sari da pratafls au rartactcnnamant da l> langua alamanda : 
«xas in *n» o> puawus pagai. <*» qu t ato ni, un dcacrswa, dat 
HO* a» grammarra al daa ««(MM «ont popcat». A lavars cuata 
«pieds* anlaccuptt da "»» « dsat . '«"*• * proçrsmmt. a rtaSa 
qjaM du orapriar» M da raxtoulon, la ban* auto intag/tt tant da 
ftriema « Ituach * «caftant ou« (Edtont CokM Vsfan). 

TQ8,T08D,T0 9,T09+ (Réf. PS 0144) 1 disK 250 F 
AMSTRAD (Réf. PS 0146) 1 (tek 225? 

COMPATIBLES PC (Réf. PS 0147) 1 disk 280 F 



DNH (Réf. PS 0178) 



1 disk 285 F 



COMPATIBLES PC (Réf. PS 0202) 1 disk 220 F 



BALADE OUTRE RHIN 
Mrn*-5trns 

Mo vous Invtt » la «M» dans ton approcha il* la tangua da Goaf». a 

rm un rtttdrt an quart aplaoott, Ikattt daa «rtrdott dt 

amp#«n»on«d»gramm*».da*mW-j«ui... 

Oaca au dialogiM awc radinaum qU analiu. ^akJ* Im itponaat al k 

gids pa> a pas, r«av* prograts* rapidsmant 

Un loddal tducall conçu a pat* du» padagog» actvt al a«vl par u» 

banda audio in»gr** al un détonnait (EdKns Cokid Vision). 

T Q8,T08D,T09,T09+ (Réf. PS 10014) 1 disk 250 F 

AMSTRAD (Réf. PS 50014) 1 disk 225 F 

COMPATIBLES PC (Réf. PS 0154) 1 disk 280 F 



DNR (Réf. PS 01 76) 



1 disk 285 F 



A LA DECOUVERTE DE LA VIE 

6imt - 5ème 
BolodavtgaB»alari(riaw 

Scusuna lorma atractv», a fajda da grapNanwa. d'airidBIcnt arrntaa 
« ds quaaacns una Mlaton a la cèfegit vagaale »i anima». Au court 
du» promanada dana dalat ans rnrlaui (tarai, botd da ma». larma.lardn). 
dtaqua aramal. chaqua vtgtul ralani lananton da ranant par son al- 
startaion, «on «yuan» da ratpVafan. son moda da raproouclon ou da 
kccmoton. (Edfant Cokial Vlttcn) 

TQ8, TQ8D, TQ9, TQ9+ (Réf. PS 0231 ) 1 disk 195 F 

AMSTRAD (Réf. PS 0230) 1 disk 195 F 

COMPATIBLES PC (Réf. PS 0232) 1 disk 220 F 



DNR (Réf. PS 0233) 



1 disk 285 F 



DNR (Réf. PS 0203) 



OBJECTIF MONDE : LES MILIEUX NATURELS 

Mm* 

L'atavt part a la dteouvtrtt du monda al aborda las distants (Mata 

ruutrt : vagaalon. bu» al dsitat Gtaca a una tynrttaa comparât» 

vtnr». '«Mariai» tare» cotipihaTtto 

La cent*» al rapprdonaTtttmtnt daa ooreiatttanctt aonl ttturtt pat 

das ccrrstAJCtont da paysagaa. daa çttphtamaa oommatiass. daa aiat- 

dc«wc«iaa.daamokaakaa.und(icmiin>...(UlcraCclcMVte<ii) 



T08,T08D,T09,T09a (Réf. PS 0201) 1 disk 195 F 
AMSTRAD (Réf. PS 0200) 1 disk 195 F 



1 disk 285F 



OBJECTIF EUROPE 

4ème - 3* m» 

l'atsv* tVtarroga sut r Euopa. I aa ramtaria. avac las tvtstrnaa aoonc- 

mc»»aiaco*n.la«rrtlaja<raiarllcealaacj/autctia«nnaa.aii*a«aa 

quala sagas (haaMon pdtqua. agrlcuua. Muai», kxaaaafan sa 

car»). lalogtoM proposa daa acharnas aiptcadh. daacartaacornmana»». 

daa «tatdcaa vanta (Ed fana Ce*.» VWon) 

TO8,TO8D,TO9,TO9*(Réf.PS0221) 1 disk 195 F 

AMSTRAD (Réf. PS 0220) 1 disk 195 F 

COMPATIBLES PC (Réf. PS 0222) 1 disk 220 F 

DNR (Réf. PS 0223) 1 disk 285 F 



OBJECTIF FRANCE 
44m -3(41» 

Un agariamt nafanal mat an plaça una epttafcn tfhtomafcn pour 
tamkarltar laa lançais avac faspaca naaonal M rtdond. 
ftskvt par ocutt la Fiança ath da prtparar una catnpagna da cutoMIt cul 
ponara sur sa ttgtont (laltufcnt. amanajaman»). laa *aa at laa s> 
duattaa da la matopo» arnar qua daa DOtt TOM. I louvara daa tehtmaa 
aipkcatH, da nombraui çtaphiama, daa aiardoaa vanta at amour* 
(Edicrta CokW VWon) 

TO8,TO8D,TO9,TO9+(Réf.PS0211) 1 disk 195 F 

AMSTRAD (Réf. PS 0210) 1 disk 195 F 

COMPATIBLES PC (Réf. PS 021 2) 1 disk 220 F 



- calculs au laa opar alerta titra tntatraa (Mfaau da doubla tnMt) ; 

- comcaar la marna» , 
-kaataflcnarltiaua; 

- dacuca» una «rus («tcultr at latouvar) ; 
tt m tt l ta Tj rt a las 

AMSTRAD (réf. MC 13A) 1 disk 200 F 

MATH&CM 
NfvtaiCM1,CM2 

Ca tadcM oomprand daa mocuaa sur ws oatata (oparalona. racfana..) 

ou U oéomatla (armatiaa sur un rapara ortHnomw avac poaatal» da 

coraructona da louraa...) . 

• Oparalona varfaalaa aur daa anasrs (avac latanua) : 

-addfan; 

-souafacfan; 

-mullpacaaon; 



DNR (Réf. PS 021 3) 



1 disk 285 F 



ASTERIX ET LA POTION MAGIQUE 

Promet aat cftaonnlaf daa Homa»» qui vatiant rottigai » labiquar da 
la polon magkiua Aaara parcourt tarais al v«a9aa a U radwch» iflrv 
o/adanB pour raalaar una tausaa pofan at pour «*ar la dnida I eom- 
barta daa Rcmalrta, rttouvara daa «daa da pcaon caohaaa, pouna ap- 

pa*Ctali.*assardaaaancMsalpaY4rardar«la(arnprcfruin.Un 
looldal matant humour al aoton Pour «x» 



AMSTRAD (réf. 0122) 


1 disk 205 F 


THOMSON (réf. 0109) 


1 disk 220 F 


COMPATIBLESSPC(réf.00126) 


1 disk 230 F 




ASTERIX CHEZ RAHAZADE 

Un nouvaau conoapt da tagUal pour una ncu»a«a avanua <T AsaWi. Voua 
»sm a a tara maoaur an acana. aeanartata ai aciaur daa avanuaa Inadaa 
dAtUrti la GaUdt ranouvalaaa tans oaata J chaqua part*. Au court 
d\xiaapcr*c*cVan»raaat«partOaolnaan«n)umauo;apriia™ 
ov» nouvata otnaraten. AttMi at aat amrt ont ma» at una hauaa 
pour var* an M k U rrtwataa fuitaïada as vtdlsrcnl la Qraca. U Pan», 
auvdaront Hcma M * autaa aaun à bord da «ut drda da tacts «tant au 
grand maf»ur daa pkaM I Attarli atl t raid» avac U aoraa du ncuvat 
atunauactrvrt<»to^aTta<dacaaur»)au.Vcusaa««s*du«paro( 
grand Icddal Cavanna (MO Ko) antacoupt da aoanaa * aofan. a«n- 
rummant Ma» au çfaprTrarMat»taari«dahrjar«»daaal»a. !*»-"- 
aur tout ws cUna. Un avanamanl 



AMSTRAD (réf. PS 0260) 


1 disk 199 F 


THOMSON, T08.T09J09+ 

(réf. PS 0261) 


1 disk 220 F 


COMPATIBLESS PC (réf. PS 0262) 


1 disk 255 F 


ATARI ST (réf. 0263) 


1 disk 245 F 



HISTOIRE : AU NOM DE L'HERMINE 

San» : au tarvk» du ttfgnaur vd*. rtaava panata dana raneami» tfut 
duaaau. at aaatt» i Butta wt acaVMa da att dMrtntt hattorts : w 
rnaunwr dana ton moutn t tau. laa hommat t armas t rantatamtnt, 
wa car* dana wa champa. la rorgarcn I aa rorga... I ptntta dant dnaran» 
l»u«Ucutha.»pc«aar.mabt^iondaUdama.. Samauton aacton 
nar trranl ■ daga qua vaut » sortant acn Saignau Una atotltnla miU- 
fan t U «aa du Uoyan Aga t tavtra un 7»td )tu aduca« au» auparbat 
graphsjmaa raatt)as. 



AMSTRAD (réf. PS 0260) 



1 disk 220 F 



THOMSON (réf. PS 0261) 



1 disk 220F 



COMPATIBLES PC (réf. PS 0262) 



1 disk 220F 



NOUVEAU 
irlATHS-Ce 
NIvmuCE1,CE2 

Ca logkial proposa putsurt pdntt datardeta dt r»V*tu court twrntnutt: 

- tangtr daa ncmbraa an ordrt odttanl t) dtoottunt ; 

- comparai dat nombrat (tupanaur. rtwnaur) aommaa prcdultt ; 
-conptVDttapttlI. 2. S. 10.20.40...). 



• Fractont atmpwt: 

-aurdaapartaadaraoundaa.dacamambars; 

-*a<*cosaquVawntet; 

- numaralau dur» tacaon... 
■CJcUs datas: 
-ont; 

-ractangw... 

avac ajrpfcatona daa rormultt an cas d'anaur. 

- calcul da votuma ; 

- aamat» (cantala at aila») ; 

- autaa prcrxrtcnnaaas . 

- pourcanogaa. 



AMSTRAD (rél. MC 11 A) 



1 disk 250F 



AMSTRAD (réf. MC11B) 



1K7 200F 



NIVEAU PRIMAIRE 

FRANÇAIS-SONS 
Nlvt«JCP,CEl,CE2 

- Compèat» daa mets avac laa sona ou aytabat < 
onoet anta daux aor»raaaambljoti 

- Corndtar dat phraaaa avac daa mot» t cher* dana daa strias da marna 
crjnacflianca. 
-S4(aciorriardar»c«pria»«6l«rtKtta)rart»ssorainrlqja«; 

Una stria da tons avac nrvaau da dieu)» proeraoU pawant corrvani 
aui twvaa daa datttt da CP pour ropatm I at aui awvaa daa dattaa da 
CEI . CE2 pour wt optons 2 tt 3. 



AMSTRAD (rél. MC13A) 



1 disk 200 F 



AMSTRAD (rél; MC13B) 



1K7170F 



NOUVEAU 

ORTWO-CM 

Niveau CE2,CM1,CM2 

Ca loddal psrmat tTapprand/a las ridas prhdpaws da rertne/aena an 

cornplacn daa phraaaa (1 » radat : a», i ou a. on ou on..). A chaqua 

tau», una arplcalon aat domaa t ralava acus la lorma du» ouaaton 

oawttdacamartquUparmaaTadac£mpranda»oran« 

oata rteta pourra «ta aflchaa pou attpfcafan. 



AMSTRAD(réf.MC12A) 



1 disk 200 F. 



MATHS 6 

Algèbre pour clam* dt Mm* 

(égtJtment Intértnani pour CM1-CM2) 

M alU-T. toija5:ep*afcr«.-»/;lacau»;cataiitu!lttrtUI%: 
pcuoanaaaa avac crapNama ; nia» rjopert o rrialas avac oraprtama 
calcuBi datas ; tyrnatlaa ortwjonasst. 



COMPATIBLES PC (réf. MC 01 A) 



220 F 



AMSTRAD (réf. MC 01 B) 
(réf.MCOIC) 



2K7170F 

1 disk 200F 



ATARI ST (réf. MC 01 D) 



1 disk 220F 



MATHS-5 4 

Algtbre pour cl»«t«» d« 5*me tt 4énw 

kl at s*T. CoqUo : rraitplaa at cMaaura dut «ntar ; rxrnbras pramwr» ; 

ctiatancaa dur an h» naud ; d t us ti pu ttfan dun anaar natutd ; P.G.C.0 

at P.P.C.M. ; calcul dgttttoua ; ratomt» (aktrrjtcatona al optrafana 

da tactona) : touafana at tnaquatena dant H. 

AMSTRAD (réf. MC02A) 2 K7 Maths 4 -170 F 

(réf.MC02B) 2 K7 Maths 5 -170 F 

(réf. MC02C) Malhs5el4- 1 disk 200 F 



ATARI ST (réf. MC 020) 



1 disk 226 F 



MATHS-3 

Akjèbr» pour classa dt 3èm* 

kl at UT. Ccouto : conatuctens da vactsurt ; 

aytatmaa kntataa 2.2 , rtglcnnamant du dar 



sus»adltl; 
tulttrtdntt 
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carte» ; notons d» tiçcnomeri». 




AMSTRAD (réf. MC 03 A) 
(réf.MC03B) 


2K7170F 

1 disk 200 F 


COMPATIBLES PC (réf. MC OX) 


220F 


ATARI ST (rél. MC 03D) 


1 disk 220 F 



EQUATIONS 

Algèbre pour classe» de 34m» «t 2nde 

M. Cocu» tquaton» du teccnd degré avec Map ta ton aapriqu» ; 

tyttamet Intairee 2,2 ; tysamat Ineaiet t n eoualois ; p inconnue» 

(op < 8) (m daquene tautsmax). 



AMSTRAD (réf. MC04A) 

(réf. MC04B) 



1K7150F 
1 disk 200 F 



MATHS-S»cond eycl» 1 
Niveau 2nde à terminâtes 

M Coqu» : equaton» du Moond deg/é avec rntapreaton graprtqut ; 
coûtai Y - <i) »« ohoô du repère et de» unies ; integri»» p* U 
mttiodt d« recangta avec iritaplutbn aapriqua M eurdcee : euliee 
reçurent»! avec aapriem» ; tondent r tdpoque». 



AMSTRAD (rél. MC05A) 
(rêl.MC05B) 



2K7 200F 
1 disk 250 F 



MATHS-Second cycle 2 

Niveau 4ème i terminale» 

M. Coqu» : image par apptcaon affina , court»* avac optent (don lard- 

copy) ; courba» ftjpapotte» ; court»» daines par morceaux (dtteuette) . 

famle dt court*» : coubet planai (onamaique) ; court)* d*lrs« pa 

imlMlfnla 



AMSTRAD (réf. MC 06A) 
(réf. MC06B) 



2K7170F 
1 disk 200 F 



GEOMETRIE PLANE 
Algèbre 2ème à terminale» 

M. HsBa : uteaki dt drain pour tut point», «ont. taonenu « 
ctidM avec raturai d* g*om*»i» aiaylqu». Uliatt dt «wttamjlcm 
((«alitai, nomofttbt. sMitude...) tut dtt loue» «mpta (cane. Ii*i- 
0e.cade...|. 



AMSTRAD (réf. MC 07 A) 



1 disk 200 F 



ATARI ST(réf MC07B) 



1 disk 220 F 



COMPATIBLES PC (rél. MC 07C) 1 disk 250 F 

ESPACES ET SOUDES 
Niveau 1ère et terminale» 

U. hrttla : utltu» dt dtuin dam reapace avec U paipectv» « dt 
hr. Rapteaialon dt tords» dant rtapaot iw ohdi dtt angta dt 

ftntHÊm 



AMSTRAD (réf. MC08A) 



1 disk 200 F 



FONCTIONS ET COMPLEXES 

Niveau terminal» et «up. 

M hVDkjr : tact dt Y . «.i). pdare». data enveloppe» avtc chai du 

ftp** ai dtt uvae» ; catcu». Citais dit « ; «lampta (ccnchdde». ca- 
sdaat.corejutt); compta» (catais. «ouatons. taralcrmaloraMtiari- 



ATARIST(rél.MC09A) 



1 disk 220 F 



FRANÇAIS 

Niveau CM1, CM2, 6èm» 

A UtJasart dica«i«utM;«tn^ti*l<>«dcat:oonijo^ton;pailci- 
ptt patte» «te tt» « avoir. 

AMSTRAD CPC (réf. MC10A) 2K7170F 

(réf. MCI PB) 1 disk 200F 

COMPATIBLES PC (rél. MC 1 0C) 1 disk 220 F 

FONCTIONS NUMERIQUES 
Niveau 1ère à »up. 

M Hrsla : calcul krmel : dtvttocpanano, tertur. d» ta lenceon» dérivée 
avec rrmprilcaton. MvaloppamanS hraae au voMnag» d» i . a Lat 
foncton» acàn. «ccot. *. ch. ri ami dtinat Ot i 4 parameri» 
dant vota lencebn Graphe» y - l(i). paramariguat ai poulet. Jutqu-» 
1 a aphat tu reaai. PottMa» d» revoir an chavjaant origjne al uni Ha. 

COMPATIBLES PC (réf. PI 001A) (nés cartes) 250 F 
AMSTRAD (avec CPM +) (réf. PI 001 B) 1 disk 250 F 



STATISTIQUES 
Niveau 1èr» et terni. 

«curare», moyenne, ecaltype Clataamanl dt domaaa bruta Striai 
aumvaiabl«a^iati»lqu*:»»gutncaida|»>t1t^daal»>aidiri»un 
ta», degr arme» histogramme». Sanat i daui Valette» pondéra* ou 
non r»P «arulon,a^am»lln**.. ariaaaon.it/aanwypibrc- 
tom ta) al «p Sauvegarde M ohsotmanl dat données, mpesacr, a 
tout manant 

AMSTRAD (tous CPC) (rél. PI 002A) 1 disk 200 F 

CREER ET JOUER AVEC 
LES MATHEMATIQUES 

Niveau 5» me i terra 

M. Hretar : 3 jeux da canal pour apprendra la» rartttamator» geone- 
«iquat: routa», tym trie» anale* al ceniaa». taraia Ion» dans ai plan 
Symttiat cane ata» al par rapport t dat para, lanataton» dan» rtapaot 
^auidtraioion.pUoareiountouSrarmaurraorit^w.pacourirlai 
64 caaa» avec h avatar ; colorier dtt reaaaui avec la mrtmum dt ccueui 
Sduton» opemata donne*» par rordnalaur. 1 ou* de a ta Son grapàqut: 
lai pavage» du plan t para dat tormaa dt bat» uuvegade. reptation, 
««nota Uaru deraiai», «uni (oystek ou dévia 

COMPATIBLES PC (ttes cartes graphiques) 

(réf. PI 003A) 250 F 

AMSTRAD (avec CPM ♦) (rél. PI 003B) 1 disk 250 F. 



ATARI ST (réf. PI 0O3C) 



1 disk 250 F 



MATRICES 

Catoutt tu ta vecteur! : tomme», produit acétate. Opéraient tu ta 
martas» : aomm». produt, pùttano». ravapotet Pamutaton. euppraaeon. 
oïa^catai. «enanot kgna» tt oordnne». Detvttwans.mariceilnvar»a». 
r «19. tact SrVtm«slr^«intgui»or»«lprKcroua» Potynona» 
caaclerittqut». valeur» pope» reaiat. comptai» Fabncatoi automa- 
•qu» da marioa» Programma BASIC avac RSX an asaarrciw Mode 
démonte aeon. Dooumanalai agarisabl» an arbaatoana». bnpataon 
»tt*Jv«>«^sudttgu»Rm^C01*ATIBLESiv«d»»t»aausccu»i» 

AMSTRAD CPC 61287664/464 (rél. PI 004A) 250 F 

POLYNOMES 

Operaacn» aur polynama» : tomme, podut. cornpoalon Vastu an un 
pot* Cacul de» radne». equalon» atotbrtaja» DeveloppamanKliitiie» 
Poynoma» de Tchtbychal. Legandrt. Hami». Banouli. Fabricaton au- 
tomatcrut ptr rampbstag» avec tormust. Tract de courbai io«orqu»» 
avec aias. arlcnaga dt coadonnaa» Copia tf eaan. Piojramm» BASIC 
avac RSX an aeeemoeur. Mode dernorsiaton OocunenBton agarisa- 
oie an arbaeicenot tmpa»eon«tujviv»d»«irdaqua Formai COM- 
PATI Bl£S avec des bctauri courant» 

AMSTRAD CPC 61 28/664/464 (rél. PI POSA) 250 F 

LOT DE TROIS LOGCIELS VOCAUX UTILITAIRES 

- VOCAIOO : dorme la perde I vote adnaltu t par» d'un tant «m- 
^Wtoitureaanù»a»on»t»cieled«liitorvatai 

- VOCAGRAPHK : ataton de vocabulat-a. de pnreeet, lrit»rv»racii ajr 
lap<incljaton>voljm«dtUvod.vtajai»ae\Trtapara7ie»i»v<icaui 
t ravalttr au raoan. 

-VCCAI.VTCA2:?catakio/mdtpUd»K»mol»orxian»»ariçaÉ» 
rrHawadamvcelcdoat 



AMSTRAD CPC 464, 664, 6128 

Le loi (réf. TMPI 02) 



K7, disk 195 F 



LOT DE 7 LOGICIELS UTILITAIRES 
ET EDUCATIFS VOCAUX 

Un» von rttit dant vota adhatu. 

- VOCACHIFFRES apptnattagede» dllttt tt dat nomdat (court al 
««ocoy 

-VOCAIPHABET : apptremaoa de raknabel. de rtcrlt» (court et 

aiadce»|. 

-VOCACUVIER:ncnitna>ondw«jJd)»«»npa/ariimartUt»)ijp 

-VOCAGMPHrC:a»ar)nd»mot».ton».mcdr«ato»d»vocabu*at 

eittam», ataton d» picnemet Buta tangua» 

-VOCA1/FR: 300 mots cou antl tançai». 

- VOCA2rFI) : 300 mou courant» aancahv 

- VOCAIOO pop amma ion vocale a par* du tant ampHt 

AMSTRAD CPC 464, 664, 6128 

Le lot (réf. TMPI 03) K7, disk 195 F 

COURS SOLFEGE 1 

Compand « moduet de court et enrdeat. 

- nota» ai cl* da SOI a FA; 

-ryfmatau»ta(rijnraeono<tr>vir».iraided\jnalo^ 
mutant cet» (fui agu» , 

- dtettt m uëcae. pou devdoppa ton aatt ; 
-etnae. 

AMSTRAD CPC 464, 664, 6128 

(réf. TMPI 04) K7. disk 195 F 



COURS SOLFEGE 2 

San» concurenc». compote dt 2 togtaaa (cou» « aradots) ceui-d 

tond»taktap»aa>awaunaraat/iamar<canmantarar>atdMa» 

a companPe lata eut ta gammée, ta traavatai Na pu mantdant 

ta rrvaht det débutai» 



AMSTRAD CPC 464, 664, 6128 
(rél. TMPI 05) 



K7, disk 195 F. 



LOGICIELS UTILITAIRES 



VIEWTEXT 

Veut vtnu d'acquérir le danta jeu d'avant!» al von n'avancu pat. 

Mari quai mot paut compand» mon «rtnatu ? VatraM arlcha cuira- 

pime tout le contenu ASCII (tule) dt vot Icrtart su cassant ou da- 

quaot. 

N'atandu pat pour envoya vo» totrton» au marjutat» 



(réf. ES 1001 A) 



K7 seulement 135 F 



IMPRESSION 

Veut possédai une Imprimant), mats ta pogrammaloi veut rabutt. de 
pat ta leudau. Ce torjdet pocjramit n'rnpak oust» mprrnanttiraoa 
d» sa» 65 commande» RSX. Pior/amme trylt dt car acier as ; pogr amma 
tadlA^r^iaajUkrs.prce/ar^WccnrôltiJtnrrormaïa.pc- 
7amme U toit 6 rjta ; poaammt ta rtooptadtaan» paarneratii» ; 
rame ; ar/andatarnail ; dtplacanant ; ttstcaon MrOttt 



(réf. ES 1002A) 
(rél. ES 1002B) 



K7200F 
disk 240 F 



L'INTERPRETE 

Lama)onBdatloo>MiaiisianttonidaniiatarquidiShakeaptaa« 
ruiltaeon n'en tel que pU dlot» fuMart». jaui (f tvanutt. (tu ..). 
Ce pograrnma veut permet dt tadutt an tançai ou tn toute aura lan- 
gue vo» tagicMt ptlere» La denurent ttt automaiqui M ne rtcuttn 
aucune conrvaittano» partoula» 

Mapprvjdudaqua;edaMndt»»aaaurs:acctpatmdi|oeai;tadull 
put dt SOO mou t U ta» ; râpera auBmatquament au la daquato la» 
tatee traduit 



(rél. ES 1O03A) 



disk 290 F 



ZENITH 

La capecat d» stockage de» dsquene» 3 pouce» ttt au maiimum de 
1 7» Ko. I M donc rMde dt stocka pXa dt ouata programmai par lacet. 
Ce p 00 amma de cornpaotage redit ta pages dt pttaitaton ana qu» 
ta por/ammet ( BASE ou BINAJRFJ an un rrannum dt plaça 



(réf. ES 1004 A) 



disk 250 F 



ECHOSOFT 

Fartai parla vor» AMSTRAD CPC tara Intataot. a«t tel U vocatoi 
dECHOSOFT Une atnpla appVcaton dun» aue» sonor» tu ranta» 
d»roroVialaj«autt«lbrrierrKrtataisaractj» Uanombrttaa» optons 
veut sont p opc tttt : errtgara. raproJurt, tauvtgada. cola découpa. 
déplaça, «natta varia tontvlaate. etc. 
Deux autet pogranmee aont tvrt» avec ot logo» : la premier ad un 
synnleaeuqutanatirmaadivlaaiuiagut.kaaxridaauigeraraau 
d»taa(porypbo>oju»| pou incorpora dans loirstapoo/ammatdtvoe* 
a talon 



(réf. ES 1005A) 



disk 395 F 



PSYCHOTEST 

Mau«-vouttradna»M»naalaritvo«trapld»dereiaoon«dedt- 
ducton Ukir^cMnefelpatappaïadticornaataiceipatcuirirw. 
ma» ptoW a vote tara da la deoucten 

Bat» tu ta ma dembauen» det tnlapnte» anacaintt. Psycholatl 
voue ofte un drvattaamaK garni. 



(réf.ESl006A) 



dtsk135F 



DIVERS 



3> 



SIUPACK 

La muttout t voet patte 2 pogranmee : pafcrmane»» . ouaMé» 

SIDRUM : boa» a ryttnaa pouammabta g* te pa mame deroian» 

(davia outoyttck). 

SliïONE tyntretsau au 5 ocovitgerlpa manui daouai» (eu. tm 

outoysteki Generaau BASIC tamoatt» a ctkJ da Srtdrun Recupart 

ta rythmée aatt pa Sadrun Gaaton de» notai « des blanche». 



Réf. ES 1008A 



1 disk 375 F 



CONVERSIONS BUS 6128 

Nouveau pou partprverique» standard (tnantlora. tynhai dflttetau»...) 



Réf. SE 1212 



175 F 



BOURSE 2000 

Oavatcppt mc daa agantj da cfianjaa. ca logbal voua parmat da 
«eut plonja dana la mkau da Il boum PU <n>è« alor . 7k» 
as tamua» * anaerpaaora M * movannaa da ca toaoal Achaau 
vota journal axai I» 0x11 da a ban» *t nom «tu garant» 
■ora pU qua * tut**** binafcaa. Avac una ou rjuaauri valut 
«1 roa> a rma ai : «1 oroamnoa a n ru a», raydufcn ■ a movama 
nobaa. laa part» al a* tguM (matiodaa racomua» par laa agana 
* ohangaa), aa rvauuaa al Ma baraaaa moyaroaa. la gan«aa ta 
maton. Cakjua ai aa outa ta» panda» agancaa ou daa cà/ta 
t rrvaaJaaarnar*. Bouraa 2000 g*a voa lia*, aerjona ou obhjatarn 



Disk CPC (réf. ES 1007A) 


450 F 


DiskPCW(rél.ES1007B) 


850 F 


DiskPC{réf. ES1007C) 


1200 F 


LOGICIELS POUR AMSTRAD CPC 


TASWORD 6128 "Mallmerg." 
TASWOROD pour 464/664 


(réf. SE 1201 D) 


390 F 


UASTERFILE 6128 

-jm t» tarait raUtonntla 


(réf. SE 12020) 


390F 


MASTERCALC 6128 

TaSaurampla.rapidaaipuawrt 


(réf. SE 1 203 D) 


350F 


TASWORD 464 

jraaamant dater» 


(réf. SE 1 200 K) 


290F 


TASCOPY 

Copiai o"aer«i pj t» da 91a. rormaa A4 « M). 


(rél. SE1208D) 


250 F 



TASCOPY CPC 

VarttancaaMt 



(réf. SE 1207 K) 


200F 


SEMABANK 

Gatfen da comptai bancatraa rapkla al tabla. 


(réf. SE 1 258 D) 


330F 


STATBT1QUES MULTIVARIEES 
POUR CPC 464*6128 


(réf. SE 1259 D) 


390 F 


SEMFICH 

Gaafcn da caatoguaa dnjuanaa CPC. 


(réf. SE 1266 D) 


250 F 


TASPRINT CPC «ur eanotlt 


(réf. SE 1205 K) 


200F 


ASTRO-2001 
Planaarkm pour CPC (1 24. 


(réf. SE 1267 D) 


325 F 


LOGICIELS POUR CPC ET PCW 
(2 variions tur la mirm dbquttl») 




TASPRINT, LE TYPOGRAPHE 

5 aoajrMiur CPC. 9 u PCW COMPATIBLES TaaaotO CPC al PCW. 
Looc*acrvpt, Wcrdrtf . 


(réf. SE 1206 D) 


250 F 


TAS-StGN 

L'alak) an anaa. araaignaa. rtdanat, craai-laa vouawnama.. (Soua 
W/MPajattuamant). 


(réf. SE 1262 D) 


320F 



LOGICIELS POUR PCW 8256 ET 8512 



TASWORD 8000 

La «aawnart * artaa raplda avac •MaJnwoa' pour aa uHuloni pro- 

aaaarmaaaa 


(réf. PS 121 7 D) 


450 F 


MASTERFILE 8000 

La baaa da doonaaa latatonnana 1 avariant anMr amant m RAM. r tpida. 

•asHa.ampa al puraurr» (aurai pour PCW 9612). 


(réf. SE 1221 D) 


550 F 


PRODUITS "PC" IBM ET COMPATIBLESS 


TASWORD PC 

Lara»amantda»«aadaiPC. aiiivpla. puasart at a« •MarhWvV. 


(réf. SE 1226 D) 


530 F 


TASPRINT PC 

La tvpographa. 26 aolUal,aaaaMdaaracrtmrrKX)aTnatfrml»alr»\ 


(réf. SE 1251 D) 


430 F 


TAS-SIGN PC 

L'artaa an tatraa. «naignaa, réclamât, craai-laa wuwnama 




(réf. SE 1 263 D) 


430 F 


LLUSTRATEUR PC 
Fuéon g/apNoua/ai» aur PC. 


(réf. SE 1269 D) 


430 F 


MASTERFILE -vtrwlon PC 


(rétSE1270D) 


890 F 


ASTRO-2001 

Ptanaorm». 


(réf. SE 1268 0) 


490 F 



©MME SPECIALE 




• BotT* DATA Cas» 5"1/4 (50 disk) 
10dsquet1esDFDD5"1/4 



• 1 Bot» DATA Cas* 3"1/2 (40 disk) 
10dJsquet1asDFDD3'1/2 



• 1 Boit» DATA Cas* 3" (20 disk) 

10 disquettes D F D D 3" 



• Boite DATA Casa saule 
r 3"1/2 90 F 

+ 
Pal et emballage 25 F 

Total Lot 115 F 



135F 

+ 
Port et emballage 25 F 

Total Lot 160F 



275F 

+ 
Port et emballage 25 F 



Total Lot 300 F 



355F 

+ 

Port et emballage 25 F 

Total Lot 380 F 



5"1/4 95 F 
+ 
Port et emballage 25 F 

Total Lot 120 F 
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^BO-B.V^ONS" 





T08,8D,9,9+ 
AMSTRAD CPC 



195 F 







MATHÉMATIQUES 







ATARI ST 

Compatibles PC 

5'l/4 et 3"l/2 



225 F 




Plus 20 F forfait port et emballage 



AUGMENTEZ VOS CHANCES GRACE A L'INFORMATIQUE 



G 
A 
G 

N 
E 
Z 

D 

U 

T 
E 

M 
P 
S 



PROFITEZ DES PRIX BRETAGNE EDIT'PRESSE 



BOITES DE 
RANGEMENT 
MEDIA BOX 
POSSO 




Pour 40 

à 150 disquettes 

3". 3" 1/4, 3" 1/2 

nsf 



DISQUETTES. '«•»' , 

Recommandé facultatif 
3" ptr Boite 7 F en plu» 




tJOF 



COMPACT 
DISC 

Pour 13 compact 
dises 

Port 25 F 

Recommandé facultatif 
pai Boite 7 F en plus 



Pour 
16 minicassettes 



95 F 



CASSETTES *■" 25 F 

Recommande facultatif 
AUDIO par Boite 7 F en ptui 






Il l 


fc 


% 




w ^ ' 



mf 



VIDEO 

Pour 9 cassettes 

vidéo VHS. V2000 

Beta 



Port 25 F 

Recommande facultatif 
par Boite 7 F en plus 




Pour 50 
à 70 disquettes 

mf 



DISQUETTES, '•"»,' „ „ 

Recommandé facultatif 
5 1/4 P*' Boi,e 7 F en plus 



c 

L 
A 

S 
S 
E 

Z 

E 
T 

P 
R 
O 

T 
E 
G 
E 

Z 




DES AFFAIRES A NE 
PAS MANQUER 



P&ns&z qu'une 
répnfzttion aoùîy 
plus ah&r qu'un& 
proî&Gîïûti J 




Housses de protection - SimUi cuir ■ (le lot cUvier + moniteur) 
Fabriquées et garanties par nos soins. 



n CPC464et664 


Moniteur monochrome 


D 


219 F port* emb. 20 F 




Moniteur couleur 


D 


219 F port* emb. 20 F 


□ CPC6128 


Moniteur monochrome 


D 


219 F port + emb. 20 F 




Moniteur couleur 


D 


219 F port + emb. 20 F 


D PC 1512 


Moniteur monochrome 


D 


249 F port ♦ emb. 20 F 




Moniteur couleur 


D 


249 F port + emb. 20 F 


Û MACINTOSH 


Clavier simple 


D 


249 F port * emb. 20 F 




Clavier pavé numérique 


D 


249 F port + emb. 20 F 


O ATARI ST 


Moniteur SM 125 


D 


219 F port + emb. 20 F 


D DMP 2000 Amstrad 






110 F port + emb. 20 F 



DES DISQUETTES 

(doubles faces, doubles densités) 



- Disquettes 5" 1/4 avec la pochette 
lot de 10 


50F 


- Disquettes 3 " 1 /2 avec la pochette 
lot de 10 


190 F 


- Disquettes 3" 

., lot de 10 


270 F 





r 



VECTOR1A 



3D~ 1\ 



Un logiciel d initiation au dessin 

en 3D, sur ordinateur. 

Une bonne approche de la CAO 

(Conception Assistée par Ordinateur). 

facilitée par l'emploi de fonctions 

simples et bien pensées. 

Le logiciel est rapide, permet le dessin 

'3 vues", la présentation 3D et l'intégration 

. des objets créés au sein d'un décor. 

Le manuel d'accompagnement 

permet une prise en main 

très rapide du logiciel. 

Vectoria 3D. version PC. 

est utilisable 

sur disquette ou disque dur. 

Il utilise la souris ou le clavier. 



^ 



/Al 



Au prix exceptionnel 

Sur PC 410 

CPC6128 410 



) 



Très bientôt sur ATARI efAMIGA. 



J 
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BRETAGNE EDIT'PRESSE 



Confiance 



Qualité 



Service 



Notre groupe fait de la VPC depuis des années sous différentes formes. 

Nous sélectionnons nos produits. Dès que l'un deux est critiqué 

par nos clients, nous le supprimons du catalogue ! 

Aussi confiance et qualité vont-elles de paire. 

Fabricants - artisans - importateurs, ce catalogue touche plus d'un million de lecteurs ! 

Votre produit intéresse peut-être un lecteur ? Prenez contact avec nous ! 

G. PELLAN - Tél. 99.57.90.37 



BON DE COMMANDE 



ATTENTION 

Bien inscrire les ARTICLES dans la bonne rubrique ; le port 
étant calculé en fonction de l'objet à expédier. 



| A adresser à : BRETAGNE EDIT'PRESSE - La Haie de Pan - 35170 BRUZ - Tél. 99.57.90.37 


CALCULEZ LE COUT : montant de l'article + port = VERITE DES PRIX 








































































TOTAL 


































































Envol Poste : 10 % 


TOTAL 


































































Envol UNIQUEMENT en recommandé (20 F par logiciel) 


TOTAL 




I 






























































Envol 20 F/housse + 7 F en recommandé - disquettes forfait 20 F (étrang 


er, noua consulter) TOTAL 




Prix valables jusqu'au 30/06/88 TOTAL 




MONTANT GLOBAL 





Je Joins mon règlement chèque bancaire Q chèque postal □ mandata Carte Bleue Q 



Nom 
N°— 



Prénom 



Rue 



Code postal 



Ville - 



IMPERATIF 

Si vous choisissez le paiement 

par Carte Bleue, n'oubliez pas d'indiquer 

le n° de la carte et la date de validité 

ainsi que votre signature 



N° Carte Bleue 



Date limite de validité 



Signature 
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l A 





*? W 



5.^ 



V 



ROLUNG 



5'/ 



STONES 



\"' 



0-' 






• C. LE MOULLEC 



PRESENTATION 

Le programme se compose de 3 fichiers 

BASIC : 

1er fichier "Rolling" 

- présentation et explications (ce fichier 
est facultatif) 

2ème fichier "Rolling 1" 

- DATA des sprites et de la routine en 
langage machine d'affichage 

3ème fichier "Rollinçj2" 

- corps principal du jeu 

Dès le départ, il est possible d'accéder 
aux tableaux 1, 5, 9 ou 13 choisissant 
les lettres A, B, C ou D. 
Les chiffres qui ornent la ligne des sco- 
res ont les significations suivantes : 



v\ s 



\s 



<c 



B/2 ; équivaut au tableau n° 6 

0/5 NB de bombes ramassées/NB de 

bombes à ramasser 

1 50 NB de secondes restant à jouer 

10000 score 



&I 4 



5. 



n 



Le joueur se déplace de haut en bas et 
de droite à gauche. S'il touche une 
pierre, cette pierre avance dans la 
mesure où il n y a pas d'obstacle. 
En appuyant sur feu la pierre dispa- 
raît si elle ne peut bouger. 
Il est possible d'écraser ses poursuivants 
avec des pierres. 

Dans certains tableaux, on obtient une 
bombe à la place du monstre ; dans 
d'autres, un instant de répit. 
Le piège le plus classique est de coller 
deux bombes côte à côte contre un mur. 
Dans ce cas, il est impossible de les ren- 
trer dans les puits. Seule solution la tou- 
che ESC. 

Certains tableaux n'ont qu'une bombe 
à rentrer. Mais le parcours à suivre est 
un vrai casse-tête. 
Bonne chance... 



ROLLING 



10 REM ::::::::::::::::::::::: VQ 

20 REM : : DJ 

30 REM : PRESENTATION : >TM 

40 REM : ( facultative ) : >TM 

50 REM : : >EB 

60REM ::::::::::::::::::::::: >YH 

70 GOSUB 570 >BK 

80 SYMBOL AFTER 190 >NP 

90 SYMBOL 191.18.30.45.45.30.12.0.12 >BC 

100 SYMBOL 192.0,12.0.12.0.0.0.0 >YZ 

110 SYMBOL 193.0.0.0.0.0.0.30.0 >Xv 

120 SYMBOL 194.12.0.12.0.12.0.0.51 >ZG 

130 SYMBOL 195.0.0.18,0.0.0.0.33 >Y0 

140 SYMBOL 196. 18.0.0.0, 18. 18, 18.0 >AA 
150 MODE 0: BORDER 0:INK 0.0: INK 1.26: INK 2. 13: INK 3.15: >CZ 



INK 4. 16: INK 5. 18: INK 6.6: INK 7.0: INK 8.24 

160 FLOT 496. 400. 8: DRAW 496.144:DRAW 640.112:PLOT 496.1 >LN 

44: DRAW 0.0 

170 enc=2:ca=191: GOSUB 180: enc=l:ca=193: GOSUB 180:enc=3 >KD 

:ca=195:G0SUB 180:GOT0 220 

180 PEN 7:L0CATE 1.24:PRINT CHR$(ca):L0CATE 1.25:PRINT >MH 

CHR$(ca+l) 

190 FOR h=32 T0 STEP -2:F0R q=2 T0 32 STEP 4:a=TEST(q >ZP 

.h) 

200 IF a=7 THEN L0CATE 10+<q/4),19-(h/2):PEN enc:PRINT 

CHR$(143) 

210 NEXT q.h:RETURN 

220 XT=192:YT=140:P=12Û:EN=2:G0SUB 240 

230 GOTO 250 

240 PLOT 700.700.EN:P2=P*P:ORIGIN XT.YT:F0R H=0 T0 P*0. 

71 STEP 2:J=S0R(P2-H*H):M0VE H.J:DRAH H.-J:M0VE J.H:DRA 

U J.-H:M0VE -H.J:DRAM -H.-J:M0VE -J.H:DRAM -J.-H:NEXT:0 

RIGIN 0.0:RETURN 



>JN 

>PZ 
>GM 
>YJ 
>GD 



^5 



250 FOR H=l TQ 5:M0VE 30,H:DRAW 610.H.5:NEXT: FOR H=6 TO 
2O:M0VE 30.H:DRAW 610.H.6:NEXT 

260 FOR H=20 TO 22:M0VE 30. H: DRAW 610.H. 1:NEXT:F0R H=l 
TO 8:M0VE H. 26: DRAW H.374.5:N£XT 
270 FOR H=8 TO 20:M0VE H.26:DRAW H.374.6:NEXT:F0R H=20 
TO 22:H0VE H.26.-DRAW H.374. 1:NEXT 
280 FOR H=616 TO 62O:M0VE H.26:DRAW H.374. 1:NEXT:F0R H= 
620 TO 632:«0VE H.26:DRAW H.374. 6:NEXT 
290 FOR H=632 TO 636:M0VE H.26:DRAW H. 374. 5: NEXT: FOR H= 
394 TO 40O:M0VE 30. H: DRAW 610.H.5:NEXT 
300 FOR H=392 TO 392:M0VE 30.H:DRAW 610.H.6:NEXT:F0F: H= 
378 TO 380:M0VE 30. H: DRAW 610.H.1:NEXT 
310 X=20:F0R T=l TO 22:M0VE T.X.-DRAW T.20.5: X=X-1: NEXT 
T 

320 X=380:F0R T=l TO 22:M0VE T.X:DRAW T.380:X=X*1:NEXT 
T 

330 X=380: FOR T=618 TO 636:hOVE T.380:DRAW 618.X:X=X+1: 
NEXT T 

340 X=1:F0R T=618 TO 636:M0VE T.20:DRAW T.X:X=X+1:NEXT 
T 

350 PEN 1: LOCATE 7.13:PRINT CHR$(233)+CHR*(233):L0CATE 

7.14:PRINT CHR$( 233): LOCATE 8.12:PRINT CHR$(233) 

360 Z=0:a$="ROLLING" 

370 FOR H=l TO LEN(A$):Z=Z+1 

380 IF Z=6 THEN Z=l 

390 B$=MID*(A$.H.1):PL0T -10.-10.2 

400 TAG.-MOVE 32+<H*40).336:PRINT Bt::TAGQFF:NEXT 

410 a*="STONES":PLOT -10.-10.6 

420 FOR H=l TO LEN(A$) 

430 W=niD*<A*.H.l):TAG:NOVE 46+(H*40).290:PRINT Bt::TA 

60FF:NEXT 

440 PEN 10:L0CATE 11.21:PRINT "bv":LOCATE l.hPRINT CHR 

♦(22)+CHR*(l) 

450 PEN 6:L0CATE 8.23:PRINT "LMC SOFTWARE" 

460 WHILE INKEY*="":WEND 

470 MODE 1: LOCATE 14.2:PEN 1:PRINT "ROLLING STONES":LOC 

ATE 14.3:PEN 3:PRINT "==============» 

480 PEN 2:L0CATE 1.6:PRINT" Pauvre BOULDER DASH.un so 
rt contraires 'acharne sur lui." 
490 LOCATE 11.6:PEN 3:PRINT"B0ULDER DASH" 
500 PEN 2:L0CATE 1.9.-PRINT" Une main maléfique a lais 
se trainer des bombes dans son univers. Il doit s'endeb 
arasser sous peine de mort en les taisant tomber dan 
s des Puits sans fond." 

510 LOCATE 1.14:PRINT" Il y en a quatre a sa disposit 
ion et il peut aussi faire éclater toutes les Pierres 
qui entravent sa marche." 

520 LOCATE 1.18:PRINT" 16 tableaux vous attendent. Mal 
grès les apparences il existe au moins une solution 
pour chacun." 

530 LOCATE 1.22:PRINT" Certains sont si ardus qu'il 
arrive même a l'auteur de s'v perdre..." 
540 LOCATE 32.25:PEN lrPRINT "<ENTER>" 
550 WHILE INKEY$="":WEND 
560 RUN "IROLLING1" 
570 ENV 1,5.3.1.1, 0,22,15,-1. 3:ENT 1.2.1.1,1.-1.1 




>TB 

:?AP 

:am 
>ze 

>AN 
>AA ' 
,>6R 
>AH I 

T,< 

>PN 
>VB 

>m 

;AA 
>TA 
>X6 
>PZ 
>HT 

>RN 

>L6 
>UD 
>CL 

>ML 

>LA 
>TN 



ZV 



>XF 



>FU 

>FK 
>UD 
>NU 
XFé 



580 ENV 3.5.3.1.5.0.1.5.-3.2 

590 RE5T0RE:READ L1,L2.L3:DIH A'/. (3. L3. 2): FOR A=l TO Ll: 
READ AV. ■ 1 . A, 1 ) . AX ( I . A, 2) : NEXT: FOF: A=l TO L2:READ ft%(2.fl 
.1),A7.(2.A.2):NEXT:F0R A=l TO L3:READ AZ(3.A.1):ICXT:60 

5UB 830 

600 RETURN 

610 DATA 66,31.206 

620 DATA 106.6.106.2.95.2.89.2.134.8.89.2.106.2.95.6.10 

6.2.95.2.159.2.142.6.142.2,134.2.119.2.106.6.113.2.106. 

2.95.2.89.6. 179.2. 159.2. 179.2.95.4. 106.4. 113.2. 106.2. 11 

3.4. 142.2,8-:). 1,89. 1.80. 1,95. 1.89. 1.80.1 

630 DATA 89.206.106,2.95.2.89.2,134.8.89.2.106.2.95,6.1 

06.2.95.2.159.2.142.6.142.2.134.2.119.2.106.6,113.2.106 

.2.95.2.89.6. 179.2. 159.2. 179.2, 134.6.2:5.2.213.2. 1<?0.:. 

213.6.284.4.358.2.426.6 

640 DATA 90.6.107.2.96.2.90.2.136.8.90.2.107.2.96.6.107 

.2.96.2,161.2.143.6,143.2.135.2.120.2.107.6.114.2.107.2 

.96.2.90.6.181.2.161.2.181.2.136.6.227.2.215.2.192.:.:! 

5.6.287.4.361.2.429.8 

650 DATA 851. 568. 426. 358. 426. 568. 851. 568. 426. 358. 42ô.56 

8. 851,563. 426. 358. 426, 5ù8. 851. 568. 426. 358. 426. 568. 638. 4 

26,319.268.319.426.638.426.319,268,319.426.956.638.478. 

379. 478. 638. 756. 638. 478. 379. 478. 638 

660 DATA 716. 478.358.284. 356,478.716. 478.402,284. 402. : 7 

8.536.358.284.213.284.358.568.379.319.225.319.379.351.5 

68.426.358.426.568.536.358,268.213.268.358.758.506.379. 

301,379.506.758.506.379.301.379.506 

670 DATA 568.379.319.225.319,379.568.0.0.0.0.0 

680 DATA 851.568.426.358.426.568.851.568.426.358.426.56 

8.638. 426.319.268.319.426.638,426.319.268.319.42û.956.6 

38. 478. 379. 478, 638. 956. 638, 478. 379. 478. 638 

690 DATA 716. 478. 358. 284. 358, 478, 716. 476. 402. 264. W2.27 

8,536.358.284.213,284.358,568,379.319.225.319.379.851.5 

68, 426. 358. 426. 568. 536. 358. 268. 21 3. 268. 358. 638. 426. 319. 

268.319.426.568,379.319.225.319.379.851.568.426.358.426 
.568.568.426,568.716.568.716.851 
700 DATA 

710 C1=C1+1:IF CDL1 THEN Cl=l 

720 IF Cl=l THEN SOUND 33.A7.(l,l.li,AX(1.1.2)*17,0.1.1: 
SOTO 740 

730 DA=AX(l.Ci,l):DB=A/!(l.C1.2):IF DB>200 THEN DB=DB-20 
0:SOUND 17.DA.DB*17.0.1.1 ELSE SOUND 1,DA.DB*17.0.1.1 
740 ON SQ(l) GOSUB 7 10: RETURN 
750 C2=C2+1:IF C2>L2 THEN C2=l 

760 DA=Ay.(2.C2.1):DB=A7.(2,C2.2):IF C2=l THEN SOUND 10.D 
A.DB*17.0,1.1 ELSE SOUND 2.DA.DB»17.0.1.1 
770 ON SO(2) GOSUB 750 
780 RETURN 

790 C3=C3+1:IF C3>L3 THEN C3=l 
800 IF C3=13 THEN SOUND 12.AX(3.1,l).17.0,3:GOT0 820 
810 IF C3=L3 THEN SOUND 4,0.11*17 ELSE SOUND 4,A7.(3,C3, 
1). 17,0.3 

820 ON SO(4) 60SUB 790:RETURN 

830 RESTORE:READ L1.L2.L3:C1=0:C2=0:C3=0:SOUND 135.0:ON 
S0(1) GOSUB 710:ON S0(2) GOSUB 750:0N S0(4) GOSUB 790 
840 RETURN 



>UL 
>AK 



>LT 



>TA 



>MJ 



•DO 



CD 



>LE 
>KF 



>KH 



/GD 
>WA 
>EW 

>XD 

>XD 
>IK 
>BL 

:P0 
>AA 
>HV 

>TL 

>GP 

>XP 
>ZJ 



>ZH 




■+- 



ROLLING I 



10 A=&AO00: F=ïcA340: L=100: WHILE A<=F:F0fi A=A T0 A+15:READ C$:K= 

VAL("&"+C*):S=S+K+65536*(S+K>32767):IF A<=F THEN POKE A,K 

20 NEXTrREAD D$:T=VAL("! 1 "+D$):IF TOS THEN PRINT CHR$(7):"Erre 



ur hgne";L:END ELSE L=L+5 
100 DATA C0,C0,00,C0,C0,C0 
105 DATA 40,C0,C0,8O. 10.C0 
110 DATA C0.C0,0O.CO,C0,CO 
115 DATA 40,C0,C0.8O, 10.C0 
120 DATA 00, 00, CO, 80,00, 40 
125 DATA C0,30,0C,48,C0,24 
130 DATA 60, 08, OC, OC. 18, OC 
135 DATA OC. OC, 20, OC, OC, 18 
140 DATA 00,00,00,00,95,00 
145 DATA 00,00,00, 3C.28, 00 
150 DATA B4,28.3C,B4,B4,28 
155 DATA B4,28,3C,F0,3C,28 
160 DATA 28,00,00,00,00,00 
165 DATA 28,80,3C,00, 80,00 
170 DATA 94,94,C0, 14,00,28 
175 DATA 28, 80. 3C, 40, 28. 00 
180 DATA 00.00.00,00,00.00 
185 DATA 04,04,08,08,04,04 
190 DATA 00,CO,CO,00,44,40 
195 DATA 00,04,08,00,00, C8 
200 DATA 00,00,40,80,00,00 
205 DATA 00, 00, OC, OC, 00, 00 
210 DATA 00,00,04,08,00,00 
215 DATA 00,00,04,08,00,44 
220 DATA 88, 00, 00, 00, CO, 00 
225 DATA 08, 00, 00, OC, OC, 00 
230 DATA OC, 00, 00, 04, 08, 00 
235 DATA 80,00,00,04,08,00 



HEND 

00,60,30,30.00,30,00,00,00,00.0480 
C0,80. 10,30.30,20,00,00,00.00.0990 
00,60,30,30,00. 30.OO.O0,0O.O0,0E40 
C0,80. 10,30,30,20,00,00,00,00, 1320 
48,48.00,84,90,CO,80,48.24,48.1838 
0C.24,48,0C,0C,18,C0,0C.0C.0C.1BEC 
04,0C,0C,08,OC,OC.OC,0C,04,0C,lCF4 
30.0C,48,10,OC,48,80,OO.OC,C0.1F90 
00, 40. 00, 00, 00. 40, 00, 00, 00, 40. 20E5 
14.3C,3C,00,3C,FO,3C.28.3C,B4.2455 
3C,F0,3C,28.3C,B4.B4,28,3C,B4,2B49 
3C,3C,3C,28,14,3C,3C,00,00,3C,2F59 
00,00,00,80,00,40,28,28,68. 14.310D 
80,00,00,28.00,00,28,28, 14.62.33DF 
28,00,00.28.00.00.80,00,80,14.3767 
68, 00, 00, 80, 00, 00, 00, 00, 00, 00, 399B 
00, 00.00,08,04, 00,00,OC,OC,00,39BF 
08,08,00,OC.OC,00,00,04,08,00.3A13 
80,88, 00,8C,4C,00,00,40,80,00,3EB7 
C4, 00,00,88. 44, 00,40,80,44,00, 421F 
00,00,00,00,00,00,00,00,04, 08,42EB 
OC,08,08,00,OC.08.08,00,OC,OC,4353 
40,80,00,00.04, 48,00,00,40,80.452B 
CB,C4, 00, 80, 00, 00, 88, 80, 00, 00. 488F 
00, 00, 00, 00, 00, 00, 00, 00, 00, 04, 49DB 
04,04,OC,00,04,04,OC,00.00,OC,4A2F 
00,40,80,00,00,84. 08,00,00, 40, 4BD3 
00,C8,C4, 88,44,00,00,40, 44, 00, 4F3B 



•240 DATA 00.40.CO. 00,00.00,00.00,00,00.00.00,04,08,00,00.5047 
245 DATA OC,OC,00.00,OC,08,08.00.0C,08,08,OO.OC,OC.00.00.50AF 
250 DATA 04.08.00.00.04. OB,00,00.40,80.00,00.04. 48.00.00,5103 
255 DATA 40.80.00, 00,04. 08,00.00.40, 80.00. OO.CC.88.00.40,54F3 
260 DATA 00,88.00, 40. 00. CO.00.00,00, 00,00.00.00,04. 08.00.5687 
265 DATA OO.OC.OC. 00,04,04, OC, 00, 04. 04, OC. CK», 00, OC, OC. 00. 56DF 
270 DATA 00,04,08.00,00,04,08,00,00,40,80,00,00.84.08.00,5843 
275 DATA 00,40,80,00,00,04,08.00,00,40. 80.00.00.44,CC,00.5ADF 
280 DATA 00,44,00,80,00,C0.00.80.00.33.00,00,33.00,00.00.5D49 
285 DATA 00,00,00. 00,00,33,33.22.00,00,00. 00.00.00,00.00.5DD1 
290 DATA 00, 00, 00. 00, 00, 22. 11. 33, 33, 00, 00. 00. 00. 00. 00. 00, 5E6A 
295 DATA 00.00.00,00,00.33,33,00. 11. OO,OO.OO,OO.0O,OO.00.5EEl 
300 DATA 00.22.00.33.33.00,00,00.00.00.40.00.00.80.00.00,6029 
305 DATA 00.00.F3.F3,F3,F3.E2.D1.E2,D1.E2.F9.F6.D1.F3.F3.6CE3 
310 DATA F3.F3,F3.F3.F3,F3,F3,F0.F0,F3,O0,Fl,F2,O0.OO.F1.792F 
315 DATA F2,00.44,B7.7B,88. 44. 50.A0. 88,44. 00.00,88,44, 00. 7EEB 
320 DATA 00.88,44. 00.00,88.3C.OO,00,3C,00.00,00,00.00.40.80F7 
325 DATA 00.00,80.F3,F3.F3,F3.CO.D1,E2,CO.D4.F9,F6,E8,F3.BD14 
330 DATA F3,F3,F3,F3,F3,F3.F3,F3,F0,F0,F3.00,F1,F2. 00,00.9962 
335 DATA 7B,B7.00,CC,B7,7B.CC,88.50,A0.44.44,00,00.88.3C.A022 
340 DATA 00,00,3C,00.00,00,00.00.00.00.00,00,DD.5E.OO.DD,A276 
345 DATA 56.01,DD,6E,02,DD,66.03.06,10,CD,19.BD,F3,C5,E5.A9B6 
350 DATA 06.04. 1A.77,13,23,10,FA.E1,CD,34.A3,C1,10.EF.FB.B0D1 
355 DATA C9.00.00.00,7C.C6.08,67,DO,D5.11,50.CO,19.D1.C9.B7C4 
360 DATA 00.00,00,00,00,00,00,00.00,00.00, 00.00,00.00,00,B7C4 
370 CLS:PRINT ■ FICHIER LAN6AGE MACHINE CORRECT..." 
380 PRINT: PRINT: PRINT 

390 PRINT" JOYSTICK 

400 PRINT: PRINT: PRINT 

410 PRINT" CLAVIER 

420 a*=INKEY*:IF a*="" THEN 420 

430 a$=UPPER*(a$):IF a$="J" THEN 460 

440 IF a$="C" THEN POKE &A340.1:60T0 460 

450 GOTO 420 

460 RUN"!R0LLING2" 

470 REM FICHIER DE 12 SPRITES + ROUTINE D'AFFICHAGE DES SPRITE 

S 

480 REM 12 SPRITES DE 4 OCTETS PAR 16 LIGNES DE PIXELS + 1 OCT 

ET DE CONTROLEE SPRITE TOUS LES 65 XTETS 

510 REM LA ROUTINE D'AFFICHAGE COMMENCE EN &A30C: SYNTAXE CALL 

&A30C,ADDEC,ADDRAM 

520 REM ADDEC=ADRESSE ECRAN OU AFFICHER LE SPRITE 

530 REM ADDRAM=ADRESSE EN RAM DU PREMIER OCTET DU SPRITE QUE L 

'ON DESIRE AFFICHER 

540 REM C LE MOULLEC 83 RUE J CURIE 22420 PLOUARETA 



[ J 3 



t C ] 



ROLLING 2 



10 


RFM 




20 


REM 




30 


REM 


CLAUDE LE MOULLEC : 


40 


REM 




50 


REM 


83 RUE J CURIE : 


60 


REM 





>MU 
>EB 
>VA 
>ED 
>RE 
>EF 




70 REH : 2:41 ." PLOUARET 

REM 
90 REM : "EL 96 73 94 24 

110 REH 
120 REH 

Eli : REDEFINITION 

REf 

5YH80L AFTEF I 

1.15.15.B.8.B.B.B.8 
190 SYMBOL 202.240.240. 16. 16. 16. 16. 16. là 
200 SYMPOL 203.B.B.8.B.B.B.15.13 
210 SYMBOL 204.16.16.16.16.16.16.240.240 

MEMORY &9FFF 
230 REM 
24< RDI 
250 REH 
260 REM 
270 K EM 

280 DEFINI a-::CALL &BBFF:MODE 0: BORDER 
290 II ;• 1.26:IM I 3.!5:INK 4.16:1NK 5.1 
B:INK 6.6:INK 7.B:INK B.24:INK 9. 12: INK 10.14:INK 11.16 
:INK 12.0: INK 13.1: INK 14.26. là: INK 15.0 
300 DEF FN oo<x.v)=fcC002+(v-l)*80+(x-l)*4 
310 ÏF PEE =1 THEN Qa=8:da=hht=0:ba=2:*e= 1 ' EL5 
E qa=74:da=75:ht=72:ba=73:te=76 

DIN 5P(12:':F0R h=0 TO ll:sp(h*l)=ltA00O+(M65):NEXT 



■ *■**■■ 



variable de base 



EK 

>FE 
KE 
•- 

KE 

n 

•xv 

■: 

<z 

>jj 

WD 



G>: 
<:m 



330 carl$=CHR$<201)+CHR$(202) 

340 car2$=CHR*(203)+CHR*(204' m. 

350 tr$=CHR$C2)+CHR$<l> 

360 nr«=CHRS<22)+CHRi(0) RE 

370 Pic=0:TEMPS=150:SC=0:vie=5 

380 ON BREAK GOSUB 5730:REM il ne faudra .nette cette h PZ 

ane Que lorque le proa sera complément au poirî 

390 ENV 1.100.3. 1:ENT 1.100.2.2 >HA 

400 ENV 2.10.-1. 2:ENT 2.10.-2.2 >WL 

410 ENV 3.5.3.1. i.0.18.6.-3.4:ENT 3.5.1.1.10.-1.1.10.1. PZ 

1.10.-1.1.15.1,1 

420 DIM ieu(21.13):DIM al$(ll) >HK 

430 GOTO 4820 >FJ 

440 REM : : : : : : : : : : : : : : : : ; : : : : >XY 

450 REM : : >KK 

46*) REM : dessin de base : 

470 REM : : J 

480 REM ::::::::::::::::::::: >XC 

490 FOR h=l TO 23 STEP 2 >QX 

500 CALL &A30C.FN Po(l.h)-2.sp(l) >ZR 

510 CALL M30C.FN Po(20.h)-2.SP«1) AI 

520 NEXT EC 

530 FOR h=l TO 20 >CA 

540 CALL &A30C.FN po(h.l)-2.SP(l) >ZW 

550 CALL &A30C.FN Po(h.24)-2.sp(l) >AH 

560 NEXT: GOTO 590 -- 

570 FOR q=l TO 21: jeu <Q.l) =10: jeu (q. 13) =10: NEXT a )RZ 



f 580 FOR a=l 
N 

[NT "A/1 PB 

610 PEN 9:L0CATE 1.7: C!; IN T tr«:carU:LOCATE 1.4:PRINT c 
a.-2t: ieu!2.2 =4 

-: l.23:PRINT carlt:LQCATE 1.24:PRINT car2*: ieu Kr 
2)=4 
670 LOCATE 19.3:FRINT carl«:LQCATE 19.4:PRINT :sO: ; e. 

.OCATE i c .27:FR!H T carit:.02H T E : 
,12) =4 
650 LOCATE l.hPRINT nr*:RETUFN 
660 REM :::::::::::::::::::: 
EM : : 

680 REM : tab +1 : 
: ÎM : : 

700 REM : : : : : : : : : : : : : : : : : : : : «L 

'.H TA GOTO 720.740.7 
?60.9B0.1< 

'0: GOSUB 11 
73( PEN hLOCATE t.t:PRINT "A/1 0/5 15-: 2 e 

:370 1550 
740 RESTORE 5040:60SUB U00:ca=5 
750 PEN 1: LOCATE l.hPRINT 
439O:B0T0 1550 

760 RESTORE 5 110: GOSUB I100:ca=6 
770 PEN 1: LOCATE l.hPRINT "A/3 

:60TD L550 
780 RESTORE 5150:GOSUB 1100:ca=4:trans=l 
790 PEN 1: LOCATE l.hPRINT "A/4 0/3 150 : GOSUB 
43%:NBFTC=3:G0T0 1550 

800 RESTORE 5190: nur=l: GOSUB !100:ca=0 GE 

810 PEN 1: LOCATE 1.1:PRINT °B/1 0/5 150 00000":I 
4390:nbPic=5:G0T0 1550 

820 RESTORE 5230:6OSUB H00:ca=4 >« 

830 PEN 1: LOCATE l.hPRINT "B/2 0/12 150 00000":GOSU! 
4390: GOTO 

840 RESTORE 5270:mir=l: GOSUB 1 100: ca=0: GOSUB 1470 
850 PEN 1: LOCATE l.hPRINT "B/3 0/8 150 00000" : GOSUB >0B 
4390:60TO 1550 

860 RESTORE 5:20:mur=l:60SUB 1 100: ca=0: GOSUB 1470 
870 PEN 1: LOCATE 1.1:FRINT "B/4 0/2 150 
4390: GOTO 1550 

880 RESTORE 5370: *ur=l: GOSUB 1 100: ca=0: GOSUB 1470 UX 
B90 PEN 1: LOCATE l.hPRINT "C/l 0/1 150 00000" : GOSUB OX 
4: 90: GOTO 1550 

900 RESTORE 5420: GOSUB 1100:ca=0:trans=l >JH 

910 PEN h LOCATE l.hPRINT "C/2 0/5 150 00000":nbPic CM 
=5:G0SUB 4390: 60T0 1550 

920 RESTORE 5460: mur= h GOSUB 1 100: ca=0: GOSUB 1470 >UR 
930 PEN h LOCATE l.hPRINT "C/3 0/1 150 OOOOO'rGOSUB >0U 
4390: GOTO 1550 

940 RESTORE 5510:nur=l:60SUB 1 100: ca=l: GOSUB 1470 >UG 
950 PEN 1: LOCATE 1,1:PRINT "C/4 0/1 150 00000": GOSUB /OX 
4390: 60T0 1550 
é 960 RESTORE 5560:G0SUB 1100:ca=l >AU 




v^ 




lAbtPZ-O 



970 PEN hLOCATE l.lrPRINT "D/l 0/15 150 00000" :G0SUB >QV 
4390: GOTO 1550 

980 RESTORE 5600:60SUB 1100:ca=0:TRANS=l >JW 

990 PEN 1:L0CATE 1.1:PRINT "D/2 0/5 150 00000":GOSUB CF 
4390: NBPIC=5: GOTO 1550 

1000 RESTORE 5640: MUR=1: GOSUB 1100:ca=0:GOSUB 1470 >VZ 

1010 PEN hLOCATE 1.1:PRINT "D/3 0/5 150 00000" :G0SU >RC 
B 4390: GOTO 1550 

1020 RESTORE 5690:G0SUB 1100:ca=4:TRANS=l >KE 
1030 PEN 1:L0CATE 1,1: PRINT "D/4 0/6 150 00000" : GOSU >DT 
B 4390:NBPIC=6:G0T0 1550 

1040 ta=l:GOTO 710 >«H 

1050 REM : : : : : : : : : : : : : : : : : : : : > XH 

1060 REM : : > R D 

1070 REM : dessin tab : >QX 

10BO REM : : >® 

1090 REM :::::::::::::::::::: >*" 

1100 IF aur=l THEN sl=l:cx=10 ELSE sl=2:cx=l >LD 

1110 FOR h=l TO U:READ al >TK 

1120 al*(h)=BIN$(al,10):NEXT >WE 

1130 FOR h=l TO 1 1 : FOR q=l TO 10 >XG 

1140 bl»=HID*(al»(h).q,i):bl=VAL(bl*> >DB 

1150 IF bl=l THEN 1190 >NP 

1160 IF bl=0 THEN 1210 >NG 

1170 jeu(q+l.h+l)=bl*cx >RC 

1180 SOUND 1,INT(RND*600)+60,5,15:NEXT g.h:60T0 1220 >WH 

1190 adx=FN po(g, (h*2)+l):CALL &A30C.adx,sp(sl) >QB 

1200 GOTO 1170 >LK 

1210 adx=FN po(g, (h*2)+l):CALL !cA30C.adx,sp(10):G0T0 11 >BD 



70 

1220 FOR h=l TO 11:READ al 

1230 al$(h)=BIN$(al.9):NEXT 

1240 FOR h=l TO 11:F0R q=l TO 9 

1250 bl$=MIW(al$(h).g.i):bl=VAL(bl$) 

1260 IF bl=l THEN 1300 

1270 IF bl=0 THEN 1320 

1280 .jeu(a+ll,h+l)=bl*cx 

1290 SOUND 1,INT(RND*600)+60.5.15:NEXT q,h:G0T0 1340 

1300 adx=FN po(q+10. (h*2)+l):CALL SrA30C.adx,sp(sl) 

1310 GOTO 1280 ' 

1320 adx=FN po(q+10, (h«2)+l):CALL &A30C.adx.sp(10) 

1330 GOTO 1280 

1340 mur=0:GOSUB 610:READ nbPic 

1350 FOR h=l TO nbPic:READ a.b 

1360 CALL &A30C.FN po(a.b).sp(3) 

1370 jeu(a+l.(b/2))=3 

1380 NEXT:READ x.y: ieu(x+l. (y+l)/2)=2 

1390 CALL &A30C.FN po(x,v).sp(5) 

1400 N1=0:M1=0:READ MONS:IF MONS=0 THEN RETURN 

1410 IF M0NS=1 THEN 1440 

1420 READ nx.nv:CALL &A30C.FN po(nx.nv),sp(12) 

1430 sn=l:nl=l:EVERY 1100,3 GOSUB 4210 

1440 READ »x.nv:CALL W30C.FN po(«x.nv).sp(ll) 

1450 si=l:ral=l:EVERY 1000. 1 GOSUB 4140 

1460 RETURN 

1470 READ nb:FOR h=l TO nb:READ a.b 

1480 CALL !(A30C,FN P0(a.b),sp(2) 

1490 jeu(a+l.(b/2))=l:NEXT:RETURN 

1500 REM :::::::::::::::::::: 

1510 REM : : 

1520 REM : ROUTINE PRINCIPALE: 

1530 REM : B 

1540 REM :::::::::::::::::::: 

1550 EVERY 250.0 60SUB 4360:S0UND 2.50.0.15.2.2.31 

1560 IF ml=l THEN GOSUB 3510 

1570 IF nl=l THEN GOSUB 3850 

1580 IF fin=l THEN 4470 

1590 IF INKEY(ba)=0 THEN s=2:G0T0 1750 

1600 IF INKEY<qa)=0 THEN s=3:60T0 1820 

1610 IF INKEY(da)=0 THEN s=4:GDT0 1920 

1620 IF INKEY(ht)=0 THEN s=l:G0TO 1680 

1630 IF INKEY(fe)=0 THEN 3120 

1640 GOTO 1560 

1650 CALL &A30C.FN po(x1.v1),sp(10) 

1660 jeu(xl+l,(vl+l)/2)=0:RETURN 

1670 REM ::: VERS LE HAUT ::: 

1680 xl=x:yl=y 

1690 y=y-2:IF ieu(x+l. (y+l)/2)=5 OR jeu(x+l, (y+l)/2)= 

THEN 4470 

1700 IF jeu(x+l,(y+l)/2)=0 THEN GOSUB 1650:60TO 1730 

SE Pv=(y+D/2:y=y+2 

1710 IFjeu(x+l,py)=l THEN 2070 

1720 IF jeu(x+l.py)=3 THEN 2660 

1730 IF sens=l THEN 1870 ELSE 1970 

1740 REM : : : VERS LE BAS : : : 

1750 xl=x:yl=y:ss=2 



>TM 

>VR 

>HP 

>DD 

>NJ 

>NL 

>TA 

>NB 

>TK 

>MD 

>TZ 

>MF 

>AA 

>XH 

>YD 

>ND 

>FH 

>2A 

>0C 

>RB 

>PP 

>EY 

>PL 

>EX 

>FE 

>BC 

>YF 

>CV 

>XH 

>RD 

>ZU 

>RF 

>XM 

>RJ 

>VK 

>W 

>0X 

>EJ 

:>EE 

:>ee 

>EF 
>HP 
>NA 
>BX 
>AU 
>VE 
>BK 
6 >HE 

EL >NZ 

>XC 
>YC 
>ZK 
>UJ 
>PM 




1760 y=y+2: IF .jeu(x+l. (y+l)/2)=5 OR jeu(x+l, (v+l)/2)=6 

THEN 4470 

1770 IF jeu(x+l,(y+l)/2)=0 THEN GOSUB 1650:G0T0 1800 EL 

SE py=(y+l)/2:y=y-2 

1780 IF jeu(x+l,py)=l THEN 2200 

1790 IF ieu(x+l,py)=3 THEN 2760 

1800 IF sens=l THEN 1870 ELSE 1970 

1810 REM ::: A GAUCHE ::: 

1820 xl=x:yl=y:sens=l 

1830 x=x-l:IF jeu(x+l, (v+l>/2)=5 OR jeu(x+l, (v+l)/2)=6 

THEN 4470 

1840 IF jeu(x+l,(y+l)/2)=0 THEN GOSUB 1650:G0T0 1870 EL >RF 

SE px=x+1:x=x+1 

1850 IF ieu(px, (y+l)/2)=l THEN 2330 

1860 IF jeu(px,(y+l)/2)=3 THEN 2860 

1870 CALL lcA30C,FN po(x,v),sp(7) 

1880 SOUND 1.300,5.1.1,1,15 

1890 CALL &A30C,FN po(x,y),sp(9) 

1900 jeu(x+l.(y+l)/2)=2:6OT0 1560 

1910 REM ::: A DROITE ::: 

1920 xl=x:vl=v:sens=2 

1930 x=x+l:IF jeu(x+l, (v+l)/2)=5 OR .ieu(x+l. (v+l)/2)=6 

THEN 4470 

1940 IF jeu(x+l.(y+l)/2)=0 THEN GOSUB 1650:G0T0 1970 EL >RK 

SE px=x+1:x=x-1 

1950 IF jeu(px,(y+l)/2)=l THEN 2470 

1960 IF jeu(px.(y+l)/2)=3 THEN 2970 

1970 CALL &A30C.FN po(x.v).sp(6) 

1980 SOUND 1.300,5,1.1,1.15 

1990 CALL teA30C,FN poix, y). sp (8) 

2000 jeu(x+l.(y+l)/2)=2:G0T0 1560 

2010 REM :::::::::::::::::::: 



>HA 

>HE 

>XE 
>YL 
>ZH 
>RN 
>RH 
>6F 



>BC 
>BP 
>ZF 
>UD 
>ZK 
>AH 
>RH 
>RY 
>GE 



2020 REM 
2030 REM 
2040 REM 
2050 REM 
2060 REM 



POUSSE CAILLOUX 



>BJ 
>BT 
>ZF 
>UE 
>ZK 
>ZH 
>XE 
>RA 
>MF 
>RC 
>XJ 
>VY 
>ZB 
>ZH 
>HT 
>JQ 



VERS LE HAUT ::: 
2070 IF jeu(x+l,py-l)=5 THEN 2100 
2080 IF jeu(x+l,py-l)=6 THEN 2140 
2090 IF jeu(x+l,py-l)=0 THEN 2160 ELSE 1730 
2100 «il=0:mu=REMAIN<l):SOUND 4. 50. 50. 15,3.3: SC=SC+2: GOS 
UB 4390 

2110 AFTER 600.1 60SUB 4160 >UV 

2120 IF trans=l THEN 2130 ELSE 2160 >AV 

2130 CALL !cA30C,FN po(x, (py*2)-3),sp(3): jeu(x+l.py-l)=3 >LP 
:GOTO 1730 

2140 nl=0:«iu=REMAIN(3):S0UND 4.50,50, 15.3.3:SC=SC+2:G0S >JY 
UB 4390 

2150 AFTER 500,3 GOSUB 4220: GOTO 2120 >CM 

2160 CALL &A30C.FN po(x, (py»2)-l),sp(10) >GC 

2170 ady=FN po(x, (py*2)-3):CALL iA30C,ady,sp<2) >00 
2180 jeu(x+l,py-l)=l:jeu(x+l,py)=0:pv=pv-l:60TO 2070 >YD 
2190 REM ::: VERS LE BAS ::: >UM 

2200 IF jeu'(x+l,py+l)=5 THEN 2230 >ZY 

2210 IF jeu(x+l,py+l)=6 THEN 2270 >ZE 

2220 IF jeu(x+l,py+l)=0 THEN 2290 ELSE 1800 >HM 
2230 b1=0:hj=REMAIN(1):S0UND 4,50,50,15.3,3:SC=SC+2:GOS >JV 



UB 4390 

2240 AFTER 600.1 60SUB 4160 >UZ 

2250 IF trans=l THEN 2260 ELSE 2290 >AH 

2260 CALL &A30C.FN po(x, (py*2)+l),sp(3): jeu(x+l.pv+l)=3 >LK 
:G0T0 1800 

2270 nl=0:iiu=REMAIN(3»:SOUND 4.50.50, 15,3,3:SC=SC+2:60S >JC 

UB 4390 

2280 AFTER 500,3 G05UB 4220: GOTO 2250 >CW 

2290 CALL &A30C,FN poix, (pyt2)-l),sp(10) >66 

2300 ady=FN po(x. (py*2)+l):CALL iA30C.ady.5P (2) >0F 

2310 ,ieu(x+l,py+l)=l:jeu(x+l,pv)=0:Pv=pv+l:GOTO 2200 >YN 

2320 REM : : : A GAUCHE : : : >RK 

2330 CALL &A30C.FN P0(x,y).SP(7) >ZX 

2340 IF jeu(Px-l,(y+l)/2)=5 THEN 2370 >CZ 

2350 IF jeu!Px-l,(y+l)/2>=6 THEN 2410 >CH 

2360 IF jeu(px-l,(y+l)/2)=0 THEN 2430 ELSE 1870 >MM 

2370 ml=0:nu=REMAIN(l):SOUND 4,50,50, 15,3.3:SC=SC+2:60S >JA 

UB 4390 

2380 AFTER 600,1 GOSUB 4160 >UE 

2390 IF transe THEN 2400 ELSE 2430 AE 

2400 CALL &A30C.FN Po(px-2,v),sp(3):jeu(px-l, (v+l)/2)=3 >LZ 

:GOTO 1870 

2410 nl=0:rau=REMAIN(3):SOUND 4.50.50,15.3.3:SC=SC+2:G0S >JY 

UB 4390 

2420 AFTER 500,3 GOSUB 4220: GOTO 2390 >CX 

2430 CALL &A30C.FN po(px-l,y),sp(10) >C6 

2440 CALL iA30C.FN Po(px-2.y),sp(2) >CU 

2450 jeu(px-l,(v+l)/2)=l:jeu(px,(v+l)/2)=0:px=Px-l:GOTO >GB 

2340 

2460 REM ::: A DROITE ::: >RU 

2470 CALL &A30C.FN po(x,y),sp(6) >ZB 

2480 IF ,jeu(px+l,(y+l)/2)=5 THEN 2510 >CY 

2490 IF jeu(px+l,(v+l)/2)=6 THEN 2550 >CE 

2500 IF .ieu(px+l,(y+l)/2)=0 THEN 2570 ELSE 1970 >MM 

2510 ml=0:rau=REMAIN(l):SOUND 4,50,50, 15.3, 3:SC=SC+2:G0S >JW 
UB 4390 

2520 AFTER 600.1 GOSUB 4160 >UA 

2530 IF trans=l THEN 2540 ELSE 2570 >AL 

2540 CALL &A30C.FN Po(px.y).sp(3): jeu(px+l. (v+l)/2)=3:G >JE 
OTO 1970 

2550 nl=0:«u=REMAIN(3):S0UND 4,50,5O.15.3,3:SC=SC+2:G0S >JD 
UB 4390 

2560 AFTER 500.3 GOSUB 4220: GOTO 2530 >CY 

2570 CALL &A30C.FN po(px-l,y),sp(10) >DD 

2580 CALL !cA30C,FN po(px,y),sp(2) >AN 

2590 jeu(px+l,<v+l)/2)=l:jeu(px.(v+l)/2)=0:px=Px+l:G0T0 >GH 

2480 

2600 REM :::::::::::::::::::: >XK 

2610 REM : : >rf 

2620 REM : POUSSE BOMBES : >UA 

2630 REM : : >RH 

2640 REM :::::::::::::::::::: >xp 

2650 REM : : : VERS LE HAUT : : : >VD 

2660 IF jeu(x+l,py-l)=0 THEN 2680 >ZQ 

2670 IF jeu(x+l,py-l)=4 THEN 2710 ELSE 1730 >HC 

2680 CALL &A30C.FN po(x, (py*2)-l),sp(10) >GK 

2690 ady=FN po(x, (py*2)-3):CALL &A30C,ady,sp(3) >0Z 
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2700 jeu(x+l,py-l)=3:.jeu(x+l,py)=O:py=py-l:6OT0 2660 >YJ 

2710 CALl &A30C.FN po(x, <py«2)-li,sp(10) >GD 

2720 FOR h=5 TO 100 STEP 5:S0UND l,50+h.3,5:NEXT >PN 

2730 pic=Pic+l:60SUB 4320: IF pic=nbpic THEN 4620 >RJ 

2740 jeu(x+l.py)=0:GOTO 1730 >MY 

2750 ROI ::: VERS LE BAS ::: >UP 

2760 IF jeu(x+l,pytl)=0 ThEN 2780 ZO 

2770 IF jeu(x+l,py+li=4 THEN 2Ô10 ELSt 1800 >HA 

2780 CALL StA30C,FN po(x, (py»2)-l),sp(10) : GL 

2790 ady=FN po(x, (pv#2)+l):CALL «tA30C.ady.sp (3) >QW 
2800 jeu(x+l.py+l)=3:.jeu(x+l,py)=0:py=py+l:60T0 2760 >YG 

2810 CALL &A30C,FN poix. <py*2)-l),sp(10) GE 

282*3 FOR h=5 TO 100 STEP 5:S0UND 1.50+h.3,5:NEXT >PP 

2830 Pic=Pic+l:GOSUB 4320: IF Pic=nbpic THEN 4620 >RK 

2840 jeu (x+l.py)=0: GOTO 1800 >HX 

2850 REM : : : A GAUCHE : : : >RU 

2860 CALL &A30C.FN po(::.y),sp(7) >ZF 

2870 IF jeu(px-l,(y+l)/2)=0 THEN 2890 >CK 

2880 IF jeu(px-l,(y+l)/2)=4 THEN 2920 ELSE 1870 >MJ 

2890 CALL lrA30C,FN po(px-l,y),sp(10) >DJ 

2900 CALL «tA30C.FN po(px-2.y),sp(3) >CH 
2910 .jeu(Px-l,(v+l)/2)=3:jeu(px,(v+l)/2)=0:px=px-l:60TO >GN 
2870 

2920 CALL !cA30C,FN po(px-l.y).spilO) >DC 

2930 FOR h=5 TO 100 STEP 5: SOUND 1.50+h.3.5:NEXT >PR 

2940 Pic=pic+1:G0SUB 4320: IF pic=nbpic THEN 4620 RM 

2950 jeu(px,(y+l)/2)=0:G0T0 1870 >ZC 

2960 REM ::: A DROITE ::: >RZ 

2970 CALL îcA30C.FN po(x,y),sp<6) >ZG 

2980 IF jeu(Px+l,(y+l)/2)=0 THEN 3000 >CT 

2990 IF jeu(px+l,(y+l)/2)=4 THEN 3030 ELSE 1970 >HX 

3000 CALL &A30C.FN po(px-l.y),sp(10) >CA 

3010 CALL &A30CFN po<Px,y),sp(3) >AC 
3020 jeu(px+l,(v+l)/2)=3:.)eu(px.(v+l)/2)=0:px=Px+l:G0T0 >GD 
2980 

3030 CALL &A30C.FN po(Px-l.y).5P(10) >CD 

3040 FOR h=5 TO 100 STEP 5: SOUND l,50+h,3,5:NEXT >PJ 

3050 pic=pic+l:GOSUB 4320:IF pic=nbpic THEN 4620 RE 

3060 jeu (px,(v+1)/2)=0: GOTO 1970 >ZH 

3070 REM :::::::::::::::::::: >XM 

3080 REM : : >RH 

3090 REM : CASSE CAILLOUX : >VD 

3100 REM : : >RA 

3110 REM :::::::::::::::::::: XG 

3120 ON s GOTO 3130.3210,3300,3380 >ZV 

3130 py=(y-l)/2:IF jeu(x+l,py)<>l THEN 1730 >KW 

3140 IF jeu(x+l,py-l)O0 THEN 3170 >AW 

3150 IF jeu(x+l,py-l)=0 THEN 2160 >ZC 

3160 GOTO 1730 >MJ 

3170 CALL fcA30C,FN po(x, (py*2)-l),sp(4) >FH 

3180 SOUND 2,50,0.15,2,2,31 >UB 

3190 CALL &A30C.FN poix. (py*2)-l).sp(10) >GG 

3200 jeu(x+l,py)=0:GOTO 1730 >HP 

3210 py=(y+3)/2:IF jeu(x+l,py)<>l THEN 1800 >KT 

3220 IF jeu(x+l,py+l)<>0 THEN 3260 >AT 

3230 IF jeu(x+l,py+l)=0 THEN 2290 >ZD 

3240 IF jeu(x+l,py)=l THEN 2070 >XC 



MONSTRE NR 1 



3250 GOTO 1800 

3260 CALL &A30C.FN po(x, (py»2)-l),sp(4) 

3270 SOUND 2,50,0,15,2.2.31 

3280 CALL !cA30C,FN po(x, (py«2)-l),sp(10) 

3290 jeu(x+l,py)=0:GOTO 1800 

3300 px=x:IF jeu(px, (y+l)/2X>l THEN 1870 

3310 IF jeu(px-l.(y+l)/2)O0 THEN 3340 

3320 IF jeu(Px-l,(y+l)/2)=0 THEN 2430 

3330 GOTO 1870 

3340 CALL &A30C,FN po(px-l,y).sp(4) 

3350 SOUND 2.50,0,15.2,2.31 

3360 CALL &A30C.FN po(px-1,v).sp(10) 

3370 jeu(px,(y+i)/2)=0: GOTO 1870 

3380 px=x+2:IF jeulpx, <y+l)/2K>l THEN 1970 

3390 IF .jeu(px+l,(y+l)/2)<>0 THEN 3420 

3400 IF ieu(px+l,(y+l)/2)=0 THEN 2480 

3410 GOTO 1970 

3420 CALL fcA30C,FN po(Px-l,y),sp(4) 

3430 SOUND 2.50.0.15.2.2,31 

3440 CALL &A30C.FN po(px-l,y),sp(10) 

3450 jeuipx, (v+l)/2)=0:60T0 1970 

3460 REM 

3470 REM 

3480 REM 

3490 REM 

3500 REM 

3510 m>:l=«x:»yl=ffly 

3520 ON sœ GOTO 3530.3640,3700,3750 

3530 mx=ax+l:IF jeu((ix+l, (ay+l)/2)=2 THEN 4470 

3540 IF jeu(œx+l,(ny+l)/2)=0 THEN 3600 

3550 IF jeu(ax+l,(ny+l)/2)=l AND cail>0 THEN cail=cail- 

l:jeu(«x+l.(iiy+l)/2)=0:G0SUB 3570: GOTO 3580 

3560 mx=mx-l 

3570 sn=INT<RND*4)+l:IF sm=l OR sa=3 THEN 3570 ELSE RET 

URN 

3580 CALL SrA30C,FN Po(axl,ayl),sp(4) 

3590 SOUND 2.50,0,15,2,2.31 

3600 CALL &A30C.FN po(nxl.»yl).sp<10> 

3610 jeu(oxl+l,(«yl+l)/2)=0 

3620 CALL &A30CFN PO(ax.my).sp(ll) 

3630 jeu (ax+1 , (my+1 ) 12) =5: RETURN 

3640 my=«y+2: IF jeu(nx+l,(ay+l)/2)=2 THEN 4470 

3650 IF jeu(ax+l,(ay+l)/2)=0 THEN 3600 

3660 IF jeu(BX+l,(ay+l)/2)=l AND cail>0 THEN cail=cail- 

1 : jeu (ax+1, (By+1)/2)=0:60SUB 3680: 60T0 3580 

3670 ay=ay-2 

3680 5«fINT(RND»4)+1:IF sm=2 OR sb=4 THEN 3680 ELSE RET 

URN 

3690 GOTO 3600 

3700 bx=bx-1:IF jeu(ax+l, (ay+l)/2>=2 THEN 4470 

3710 IF jeu<ax+l.(ay+l)/2)=0 THEN 3600 

3720 IF jeu(mx+l,<ny+l)/2)=l AND cail>0 THEN cail=cail- 

1 :. jeu (ax+1, (ay+l)/2)=O:G0SUB 3740:GOTO 3580 

3730 Bx=mx+1 

3740 sa=INT(RND»4)+l:IF sb=3 OR sb=1 THEN 3740 ELSE RET 

URN 

3750 ay=ay-2:IF jeu (ax+1, <ay+l)/2)=2 THEN 4470 



>HG 
>FH 
>UB 
>G6 
>HX 
>HG 
>DL 
>CP 
>NC 

;-cv 

>UA 

:>db 
>zz 

>KL 

>DR 
>CR 

:NC 

>cu 

>UZ 
>DA 
>ZZ 
>W 
>RJ 
•RP 
.-TA 
>VP 
>PH 
>AC 
>NN 
>DC 
>JH 

>HE 

:.>ba 

-DR 
>U6 
>EP 
>VF 
>CZ 
>BC 
>NU 
'DE 
>JR 

HK 



>NE 
>NP 
>DB 
>JK 

>HB 
>BY 

>NY 



3760 IF .ieu<ax+l,(my+l)/2)=0 THEN 3600 >D6 
3770 IF jeu((ix+l.(«y*l)/2)=l AND cailX) THEN cail=caii- JW 
hjeutmx+l,(«iy+l)/2>=0:60SUB 3790:60T0 3580 

) rov=my+2 >HK 
:■ s«=IMT(RND*4)+l:IF sm=4 0F; sn=2 THEN 3790 ELSE RET CC 
URN 

3800 REM : : : : : : : : : : ; : : ; : ; : : y/j 

3810 REM : : >RG 

3820 REM : MONSTRE NR 2 : >RN 

3830 REM : : rj 

3840 REM :::::::::::::::::: >y]( 
3850 n::l=n:<:nyl=ny 

3860 ON sn GOTO 3870.3980,4040.4090 : AX 

3870 nx=nx+l:IF ieu(nx+l. (ny+l)/2)=2 THEN 4470 >Nfi 
3880 IF jeu(nx+l.(ny+l)/2)=0 THEN 3940 
3890 IF jeu(nx+l,(ny+l)/2>=l AND cai>0 THEN cai=cai-h ■ 
eu(nx*l,(ny+I)/2)=0i60SUB 3910:60T0 3920 

3900 nx=nx-l HE 
3910 sn=INT(RND*4)+l:IF sn=l OR sn=3 THEN 3910 ELSE RET El 
URN 

3920 CALL 1A30C.FN po(nxl.nvl).sP<4) 

3930 SOUND 2.50.0. 15.:.:. 31 >[£ 

3940 CALL &A30C.FN Po(nxl.nyl).spUO) >EZ 

3950 ieu(nxl+l.(nyl+l)/2)=0 >V0 
3960 CALL &A30C.FN Po(nx.ny).5P(12) 

3970 jeu(nx+l,(ny+i)/2)»6:REÎlJRN .>&n 

3980 ny=nv+2:IF jeu(nx+l. (ny+l)/2)=2 THEN 4470 >NF 
3990 IF jeu(nx+l.(ny+l)/2)=0 THEN 3940 
4000 IF jeu(nx+l,(ny+l)/2)=l AND cai>0 THEN cai=cai-h 
eu(nx+l,iny+l)/2)=0:60SUB 4020:G0T0 3920 

4010 nv=ny-2 >HA 

4020 sn=INT(RND*4)+l:IF sn=2 OR sn=4 THEN 4020 ELSE RET ;BL 
URN 

4030 60T0 3940 >NA 

4040 nx=nx-l:IF jeu(n;:+l. (ny+l)/2)=2 THEN 4470 >NR 

4050 IF jeu(nx+l.(ny+l)/2)=0 THEN 3940 >DJ 
4060 IF jeu(nx+l.(ny+l)/2)=l AND caiX) THEN cai=cai-l:.j >DM 
eu (nx+l.(nv+l)/2)=0: GOSUB 4080:60T0 3920 

4070 nx=nx+l >HB 

4080 sn=INT(RND*4)+l:IF sn=3 OR sn=l THEN 4080 ELSE RET BX 
URN 

4090 ny=nv-2:IF ieu(nx+l, (ny+l)/2)=2 THEN 4470 >NA 

4100 IF .ieuinx+l,(ny+l)/2)=0 THEN 3940 >DE 
4110 IF jeu(nx+l.(ny+l)/2)=l AND cai>0 THEN cai=cai-l:j >DH 
eu (n\+l.(ny+l)/2>=0: GOSUB 4130:GOT0 3920 

4120 ny=ny+2 >HA 

4130 sn=INT(RND*4)+l:IF sn=4 OR sn=2 THEN 4130 ELSE RET >B0 
URN 

4140 s»=INT(RND*4)+l:cail=ca:RETURN .FB 

4150 REM UN OS ? TEL 96 3B 94 24 (demande: CLAUDE) >PL 

4160 fflx=INT(RND*19)+l:niy=INT(RND*!2)+l >HM 

4170 IF jéu(»x.my)<>0 THEN 4160 >YV 

4180 jeu(«x.œy)=5:mx=<nx-l:ffly=(By*2)-l >6T 

4190 CALL &A30C.FN po(mx,my),5P(ll) >CC 

4200 ■1=1:EVERY 800.1 60SUB 4140:RETURN >6V 

4210 sn=INT(RND*4)+hcai=ca:RETURN >EN 

4220 nx=INT(RND*19)+l:ny=INT(RND«12)+l >HL 




4230 IF jeu(nx,ny)<>0 THEN 4220 

4240 jeu(nx.ny)=6:nx=nx-hny=(nv*2)-l 

4250 CALL M30C.FN po(nx,ny),»(12) 

4260 nl=l:EVERY 900.3 BOSUB 4210:RETURN 

4270 REM :::::::::::::::::: 

4280 REM : : 

4290 REM :TEMPS/SCORE/ETC : 

4300 REM : : 

4310 REM :::::::::::::::::: 

4320 IF NBPI09 THEN 4350 

4330 PEN û:LOCATE 6. lsPRINT CHR$U43):PEN hLOCATE 5.1: 

PRINT TR*:PIC 

4340 SC=SC+1:G0SUB 4390:RETURN 

4350 PEN 0:L0CATE 5,1:PRINT CHR*il43)+CHR$(143):F£N 1:L 

OCATE 4.1:PRINT TR$:PIC:GOTO 4340 

4360 DI:TEMPS=TEMPS-5:PEN hLOCATE 10.1: PRINT TEMPS: PRI 

NT CHR$(7) , 

4370 IF TEMPS-5 THEN fin=l:EI:RETURN 

4380 EhRETURN 

4390 PEN 0:1F SC>99 THEN LOCATE 16.1:PRINT CHR$(143)+CH 

R*(143)+CHR$(143):PEN hLOCATE 15.1:PRINT TR$;SC:NR$:RE 

TURN 

4400 IF SC>9 THEN LOCATE I7,1:PRINT CHR$(143)+CHR$(143! 

:PEN hLOCATE 16.1:PRINT TR$:SC;NR$:RETURN 

4410 LOCATE 18.1:PRINT CHR$(143):PEN hLOCATE 17. 1:PRIN 

T TRt:SC:NR$:RETURN 

4420 REM :::::::::::::::::: 

4430 REM : : 

4440 REM : VIE -1 : 

4450 REM : : 

4460 REM :::::::::::::::::: 

4470 FOR h=0 TO 3:mu=REMAIN(h):NEXT 

4480 fin=0:cai=0:cail=0 

4490 vie=vie- h BORDER 26:INK 0,26: INK 1.26:INK 2.26 

4500 DUT 4BC00,2:0UT &BD49, 49: SOUND 4. 1500. 50. 7. 0.0. 10: 

OUT &BC00,2:0UT &BD49,46 

4510 FOR t=l TO 4000:NEXT t 

4520 BORDER 0:INK O.O.-INK 1.26: INK 2.13 

4530 60SUB 4560:ERASE jeu:ERASE al$:DIM jeu(21.13):DIM 

alt(U) 

4540 60SUB 570:TEMPS=150:PIC=0 

4550 IF vie=0 THEN 4820 ELSE 710 

4560 PEN hLOCATE 1,1: PRINT" ONE PLAYER MAN ":LOCAT 

E 18,1:PRINT VIE:RETURN 

4570 REM :::::::::::::::::: 

4580 REM : : 

4590 REM : GAGNE : 

4600 REM : : 

4610 REM :::::::::::::::::: 

4620 FOR h=0 TO 3:nKJ=REMAIN(hi:NEXT 

4630 cail=O:cai=0:trans=O 

4640 sc=sc+3:G0SUB 4390 

4650 INK 12. 18,0: FOR h=l TO 20 

4660 SOUND l,h*10, 10,14 

4670 IF sens=l THEN GOSUB 4690 ELSE GOSUB 4730 

4680 NEXT h:TA=TA+l:INK 12,0:60T0 4540 

4690 CALL &A30C.FN po(x,y),sp(7) 
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FOR t=l TO 200:NEXT 
CALL IA30C.FN po(x.y).SP<9) 
FOR t=l TO 200:NEXT:RETURN 
CALL M30C.FN po(x.v).sp(6) 
FOR t=l ÏO 200:NEXT 
CALL &A30C.FN po(*,y),SP<8) 
FOR t=l TO 200:NEXT:RETURN 
REM :::::::::::::::::: 
REM : 
REM : 
REM : 
REM :: 




PERDU 



4890 

4900 

4910 
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870 

4940 
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5130 

1.13. 

5140 

5150 

5160 
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5180 

5190 

5200 

5210 

2.3.1 

5220 

5230 



Q.SrCALL WaOC.FN po(10.17).sp<5> 

WHILE lNKEY*0 , " , :WEND:vie=5 

PEN 3:L0CATE 4.20:PRINT "REVITALISATION": 

PEN 2:L0CATE 3.22:FRINT "CHOIX DE L'ARENE" 

PEN 3:L0CATE 4,24:PRINT"A - B - C - D" 

<=1 

CALL W30C.FN po(10.X),sp(2) 

FOR t=l TO 200:NEXT 

CALL &A30C.FN PO<10,X),SP<10) 

A*=INKEY*:1F At="" THEN 4920 ELSE 4940 

x=x+2: IF x=17 THEN 4930 ELSE 4880 

SOUND 2.50.0, 15.2.2. 31:F0R t=l TO 20OO:NEXT:GOTO 4 
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A$=UFPER*(At):IF A$="A" THEN TA=1:CLS:60T0 490 

IF A*="B" THEN TA=5:CLS:G0T0 490 

IF A$="C" THEN TA=9:CLS:G0T0 490 

IF A$="D" THEN TA=13:CLS:G0T0 490 

GOTO 4920 

REM :::: tab 1 :::: 

DATA 16, 255. 28e. 288, 430,808. 367. 288. 264, 255. 16 

DATA 32.508. 130, 10.490.75.458.26. 10.508. 32 

DATA 5.8, 13.9. 13. 10, 13, 11. 13. 12. 13. 16.7,0 

REM :::: tab 2 :::: 

DATA 256.383,65,477.4.511.321.349.84.471.64 

DATA 128.254.2.443.160.190.130.238.40,491,8 

DATA 3,6.9; 12. 13, 15. 15. 17,7. 1.10.9 

DATA 256,383,65.477.4.511,321.349,84,471,64 

DATA 128.254.2,443,160,190.130.238.40.491.8 

DATA 3.6.9,12.13,15,15,17,7.10,9.1.7 

REM :::: tab 3 :::: 

DATA 0,131.130.226.0.477,277.469.85.477.0 

DATA 0,284,272.284.0,440. 16.272. i6.16.û 

DATA 9,7,9.13,9.16,7,3,15,3,19,7.15,7.17.7,19,16,2 

21,2,9,19.2,5 

REM :::: tab 4 :::: 

DATA 8.11,992,270.66,250,128.171.426.234.10 

DATA 4,500,22.468,276.470.80,478,0.492.20 

DATA 1,6,9,18,9,2.16.5.10,13 

REM :::: tab 5 :::: 

DATA 0, 508, 260, 260. 260. 508, 0, 0. 0. 0, 

DATA 0.254. 130, 130. 130,254,0,0,0,0,0 

DATA 7.5,13,5,7,10.17,10.19,10,21.15.7,15,13.6,17. 

1,14,7 

REM :::: tab 6 :::: 

DATA 128.16,256.264,108,0.273,132,12,96,76 
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5240 DATA 32.0.304.2,8,96.36,256.145.16,68 

5250 DATA 12,4.3,1.9,1.19,6.9.5.23.7,23.9.15,12.3.13.9. 

19, 7. 19. 13. 16. 17. 3. 9.2. 16,9. 5. 19 
5260 REN :::: tab 7 :::: 

DATA 0,0,24,996,4,788,500.20.20.0,32 
5280 DATA 16,0.160.160.188,163,128,159.96. 
5290 DATA 8,6.3,8,3,10.3.10.23.12.23,14,23.4.11.16.15.1 
0.21.2.5.11,15.15 

5300 DATA 6.7. 11.5. 13. 13. 15. 15. 13.6.9. 14. 17 
5310 REM :::: tab 8 :::: 
532C DATA 236.256.256.256.256.256.1022.0. , . 
5330 DATA 2.2.2.2.2.2.511.0.' , 
5340 DATA 2.5.9. 15.9. 10.21. 1.6,3 
5350 DATA 6, 3.3. 3. 13.8.5. 16.3. 16. 11. 12. c 
5360 REM :::: tab 9 :::: 

5370 DATA 511.272,86.768.350,88,347.336,3,731.128 
5380 DATA 510^5,480.6,480,119.372.0,374,372.4 
5390 DATA 1.10. 11. 10.23.1.°. 5 
5400 DATA 5,14.3.15.3.2.19.8.15. 1S. 11 
5410 REM :::: tab 10 :::: 
5420 DATA 0.0,255,128.128,128.128,128.255,0,0 
5430 DATA 0.0.508. 4. 4. 4, 4. 4. 50*. 0.0 

5440 DATA 0.10.23.2.6,9.13.15 
5450 REM :::: tab 11 :::: 

5460 DATA 0. 51 1.256. 271. 256. 264. 264, 256. 507. 8. 8 

5470 DATA 0.384,64.350,2.66,66.66.450.:.: 

5480 DATA 1,4,9.16,3.2.10.7.10.23 

5490 DATA 5.7.11.9.15.10.21.13,5.16.21 

5500 REM : : : : tab 12 : : : : 

5510 DATA 0.0.0,960.64.126.0.1020.7.0.0 

5520 DATA 0,0,0.0.0.511.0,248.488,15.0 

5530 DATA 1.17.15.19.3,1.8.15 

5540 DATA 10. 1.13.2. 13.3. 13. 1.15.2. 15.3. 15.9. 17. 10. 17.1 

1.17.19.15 

5550 REM :::: tab 13 :::: 

5560 DATA 0.479.272,471.85.465.287.448,95.469.0 

5570 DATA 0,510,2,186,170.170.170.170,170,238,0 

5580 DATA 15.3.7.3.11.3,15.3,19.7.7,7,13,7.21.9.11.9.21 

.11.17.13.9.13,19.15.11.17.9,17.19,5.3.1.17,21 

5590 REM :::: tab 14 :::: 

5600 DATA 0.0,0.0,1,3.1,0,0.0,0 

5610 DATA 0.0.0.0.0.256,0.0.0,0.0 

5620 DATA 0,6,11,2,15,19.5,3 

5630 REM : : : : tab 15 : : : : 

5640 DATA 0,253,256,256.0,256.256,256.256.255.0 

5650 DATA 0.508,2,2,2.2,0.2.2,252,0 

5660 DATA 5,10.11,10.13,10.15.9.13.11.13.6.11.2.5.3.15. 

23 

5670 DATA 4,4,17.7,17.6.7.13.9 

5680 REM :::: tab 16 :::: 

5690 DATA 0.0,469,349.393,329,457.0.127,0,0 

5700 DATA 0.0.402.18.274,18,384.0.504.0,0 

5710 DATA 2,15.15.18.15,10,23,2,3,3,18,3 

5720 REM :::::: BREAK. ::::: 

5730 FIN=1:RETURN 

5740 REM EN CAS D'IMPOSSIBILITE DE GAGNE POUR NE PAS A 

TTENDRE LA FIN DU TEMPSA 
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MELANGE 
COULEURS 





• Jean REINGOT 



Le mélange des 3 couleurs 
primaires permet d'obtenir 
toutes les nuances possibles 
et imaginables de couleurs. 
Ce principe simple est utilisé 
dans le programme mélange 
de couleurs ou COULMELO 
pour les intimes. Alors à vous 
de décrire (logiquement) le 
résultat des diverses 
combinaisons et croyez-moi 
le problème est parfois très 
ardu ! 



HHHHH>**4***«»t«***t*M**t**t«4**** >LA 

20 ♦♦♦ COULMELO *** LB 

30 t*t Jean Reinqot **t >LC 

4( *** Version 664.6128 ♦•« >LD 

50 »§« Novetfre 1987 ♦♦* ,>LE 

60 *** DALTONIENS S'ABSTENIR ♦♦» >LF 

70 »M»*«***t««*«««*+mtt**«****f**« >LG 

80 '*«» INITIALISATIONS #*« >LH 

90 ***♦*****#*«*♦#♦##*#*#«#*«»*#»«»* ;LJ 

100 CLS >TF 

110 HINOOHtl, 2,28, 17,24 ;RN 

120 WINDOH#2.30.39,21.24 >RR 

130 MND0WI3.31.37.18.18 >RC 

140 t=0:sc=0 >ED 

150 ENV 1.1.15,6.15,-1,8 >0V 

160 ENV 2,1,15.5.5,-1.10.10,-1.5 >XR 

170 DM «(2.48) , 11X2,5) , 12$(2,5) . 13*(2.5) ,p$(2,5) >0U 

180 INX 0,0: BORDER 0:PAPER >m 

190 PRINT CHR$(22)+CHRi(l) >UL 

200 INK 1,6: INK 2,2:INK 3,24 >UP 

210 FOR i=l T0 3 >VC 

220 c$(i)=CHR$(15i+CHR$(i) >UH 

230 P$(l.i)=c$(i)+CHR$(143) >UQ 

240 p$(2,i)=c»(i)+CHR$(207) >UU 

250 NEXT ;>EC 

260 FOR 1=1 T0 2:F0R j=l T0 3 >UH 

270 ll*(i,j)=p$(i.j)+p$(i,j) >VZ 

280 12$(i,j)=ll*(i,j)+ll$(i,j) >XH 

290 13$(i,j)=ll$(i,j)+p$(i.j) m 

300 NEXT:NEXT >BA 

310 FOR 1=1 T0 2 >VC 

320 p$(i,4)=p$(i.l) >MC 
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330 P$(i.5)=P$(i.2) 

340 ll$(i.4)=ll*u.l) 

350 ll$(i.5)=ll$U.2) 

360 12*(i,4)=12*(i,l) 

370 12l(i,5)=12$(i.2) 

380 13$(i.4)=13$d.l) 

390 13*u.5)=13$(i.2) 

400 NEXT 

410 GOSUB 1760:60SUB 2930 

420 CLS: GOSUB 2860 

430 **♦♦**♦«*#«*#♦*****##*♦«**#♦♦**» 

440 '*** MENU *** 

450 #«**#*♦*♦**#*♦****♦♦♦»#**♦♦♦♦«*### 

460 L0CATE 4.4:PRINT"I1 faut trouver les deux plaques" 

470 L0CATE 4.5:PRINT"qui en s additionnant donneront" 

480 L0CATE 4. 6: PRINT" le modèle. " 

490 L0CATE 4.9:PRINT"I1 suffit de taper la lettre" 

500 L0CATE 4.10:PRINT"de la Plaque choisie." 

510 PEN 3:L0CATE 10,13:PRINT "Niveau 1 Facile" 



520 L0CATE 10,14:PRINT "Niveau 2 Plus difficile" 
530 L0CATE 10.15:PRINT "Niveau 3 Assez difficile" 
540 L0CATE 10. 16: PRINT "Niveau 4 Difficile" 
550 LOCATE 10.17:PRINT "Niveau 5 Dur" 
560 LOCATE 10.18:PRINT "Niveau 6 Pour champions" 
570 LOCATE 10, 19: PRINT "Niveau 7 Casse-tete" 
580 LOCATE 10.20:PRINT "Niveau 8 Super-as" 
590 PEN 2:LXATE 12. 22: PRINT "Votre choix <1 a 8) 
600 r»=INKEY$:IF r$="" THEN 600 
610 r=VAL(r$):IF Kl OR r>8 THEN PRINT CHR*(7):GOT0 600 >YK 
620 CLS:0N r 60SUB 670,890,1110,1320.1540.1760,1980.220 >YV 


630 GOSUB 2860: GOSUB 2870:60SUB 2420: GOSUB 2460 >0C 
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640 *»*♦***********♦*****»**********♦■♦ 

o50 '»♦* FIGURES NIVEAU 1 ♦** : TB 

ùa r, «»•»***>*****»***»»»****+#****++** ; tc 

670 FOR i=l TO 2 >MB 

680 FOR i=l TO 4:f$(i,.i)=12$(i.l):NEXT >EE 

t>9û FOR i=5 TO 8:f$(i..ii=12$d.2):NEXÏ >EQ 

700 FOR ,i=9 TO 12:f$(i, i ) = 1 2» ■ ,i.3):NEXT FT 

710 FOR j=13 TO 14:t*u. j)=12»<i.l):NEXT 0/ 

720 FOR o=15 TO 18:«<i. j) «12$ (i, 2): NEXT >G6 

730 FOR j=19 TO 22:«<i.o')=12$(i,3):NEXT :>GH 

740 FOR ,i=23 TO 24:f$ii..i)=12$(i.l):NEXT >GD 

750 FOR .)=25 TO 28:f$<i.o)=ll$(i.l)+ll$(i.2):NE'.T >RN 

760 FOR .1=29 TO 32:«(i, o)=H$<i.2)+ll$li.3):NEXT >R0 

770 FOR j-33 TO 36:f$(i,o)=ll$d.3)+ll$(i.l):NEXT >RP 

780 FOR .1=37 TO 38:f$(i..iJ=ll$U.l)+ll$(i.2):NEXT >RW 

790 FOR j=39 TO 40H$(i..i)=U$li,2)+ll$(i.l):NEXT RR 

800 FOR .1=41 TO 42:t$ii,.i>=ll$ii,2>+ll$u.3):NEXT >RE 

810 FOR .1=43 TO 44:f$U,.)) = ll$(i,3)+ll$<i.2):NEXT >RK 

820 FOR .1=45 TO 46:f$<i.,i)=ll$(i.3)+ll$li,l):NEXT >RP 
830 FOR i=47 TO 48:«<i. j)=ll*(i.l>+U$(i,3>:NEXT 

840 NEXT 'EH 

850 RETURN >ZJ 

860 *********»****#******************* /TE 

870 *** FIGURES NIVEAU 2 »** T F 

880 M******************************** N S^S3' -'TG 

890 FOR i=l TO 2: FOR j=0 TO 2 /^^Q^ >UD 

900 F$(i,l+o*4)=ll$<i < o+l>+ll$'.i..i+2> f ^^ A >cc 

?10 F$(i.2+o*4)=ll$ii,o+l)+ll$<i.o+2i ( A Bj 1 CE 

920 F*(i,3+j»4)=m(i,j+2)+ll$u.o+3) jjM >CJ 

930 F$(i.4+.)*4)=ll$<i,o+2)+ll$(i,o+3) jB^^^ >CL 

940 F$(i,13+o*4)=ll$(i,o+l)+ll$<i,0+2) « >DV 

950 F$<i,14+o*4)=ll$(i.o+l)+ll$(i,o+2) WA >DX 

960 F$(i,15+o*4)=ll$li,o+3)+ll$(i,j+l> «V >DA 

970 F$(i.l6+o«4)=ll$(i.o+3)+ll$(i.o'+l) MA >DC 

980 F$(i, 25+o*4) =11$ <i,o+l> +11$ <i,o+2) M 'DC 

990 F$(i.26+o«4)=ll$(i.o+l)+ll$(i.o+2) M DE 

1000 F$(i.27+o*4*=ll$(i,o+l)+ll$(i.. 1+3) ^h >EY 

1010 F$(i,28+o»4)=ll$(i.j+l)+ll$(i. j+3) ^^ EA 

1020 F$(i,37+o*4)=12$(i,o+l) ! VE 

1030 F$(i,38+o«4)=12$(i, o+l) >VG 

1(>40 F$(i, 39+o*4) =11$ (i,o+2) +11$ (1,0+3) M >EG 

1050 F$(i.40+o*4)=U$(i,o+2)+ll$ii, j+3) I^Ê >EZ 

1060 NEXT: NEXT j^M >HF 

1070 RETURN i^Ê . FB 

1080 ********************************* J^m ^ 

1090 ♦** FIGURES NIVEAU 3 ♦* wW j >¥C 

1100 '********************************* ^* f >XE 

1110 FOR i=l TO 2 y >BC 

1120 FOR o=l TO 4 STEP 3:*$<i.o)=12$(i,2):NEXT M 

1130 FOR j=5 TO 8 STEP 3««<i, j)=l»(i,l):NEXT >HP 

1140 FOR o=9 TO 12 STEP 3:f$(i, j>=12$ii,3):NEXT >NJ 

1150 FOR j=2 TO 3:f$(i,o)=12$(i,l):NEXT >FD 

1160 FOR j=6 TO 7:f$d,o>=12$(i,3):NEXT >FQ 

1170 FOR o=10 TO ll:«(i,j)=12$(i,2):NEXT >HC 
1180 FOR j=13 TO 16:f$(i,o)=P$<i.2)+ll$(i.l>+P$<i,2):NE >AR 
XT 

1190 FOR j=17 TO 20:f$(i.o)=p$<i,l)+ll$(i,3)+p$(i,l):NE >AR 
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FOR o=21 TO 24:tt(i,j)=P$ti.3)+U$(i.2)+p$(i,3):NE M 



FOR .1=25 TG 34 STEP 3:«<i, j)=12»iï,l):NEXT 

FOR i=26 TO 35 STEP 3:«(l.j)=12$(i.2):l€XT 

FOR 1=27 Tû 36 STEP 3:tt(i,j>12*<i.3):NEXT 

FOF: o=37 TO 40:f$(i.o>=P$U.l)+P$(i.2)+P$'.i 

NEXT 

FOR o=41 Tu 44:t$',i < ,i)=P$(i.Ii+p$u,3'+P$',i 

ne .a 

FOR o=45 TO 48M$u..O=d$<i.3)+p$U.1)+p$<i 

NEXT 

NEXT 

RETURN 

***«•♦♦***«***#*♦♦********♦*****♦•» 
*** FIGURES NIVEAU 4 **» 
*******+♦♦**♦*♦♦«****♦+*#♦#*♦♦*♦* 

FOR 1=1 TO 2: FOR o'=0 Tû 2 

rt(i, 1+0*4) = 11$ (1, o+l J+p$(i,. 1+2) +p$u. j+3; 

f$(i.2+o*4)=ll$(i.)+l!+P$';i.o+2)+P$U.i+3) 

f$(i.3*.i*4)=13$(i,o+2)+P$(i,i+3( 

f$(i.4+.j*4)=i2$a,o+3) 

f$(i.l3+o*4;=12$ii..j+l) 

t'$ (i. 14+o*4) =p$( î.o+l) +13$ ii. 

«(i.l5+o*4)=P$(i.o+D+P$(i,0+2)+ll$u. j+3) 

f$(i.lû+o*4)=p$(i,o+l)+P$u.o+2)+ll$u. j+31 



1410 Hu.25+o*4)=13$(i,o+li+P$d. i+2) 

1420 f$',i.26+o*4>=P$(i.o+l)+li$(i.O + 2)+p*u.iO 

1430 4$(i.27+o*4)=p$(i,!+l)+ll$u,o+2)+p$(i,0+3i 

1440 f$u.28+.i*4)=P$(i,o+2)+13$(i. i+3) 

1450 f$(i.37+o*4)=p$li.o+l)+13$(i,o+2) 

1460 f$(i.38+o*4)=p$ii.o+2>+il$(i.o+3)+P$u.i+:) 

1470 «(i,39+o*4)=p$(i.o+2)+ll$(i,J+3i+p$(i.i+: 1 

1480 t"$(i.40+i*4)=13$(i.o+2)+p$(i.o+D 

1490 NEXT: NEXT 

1500 RETURN 

1510 **♦♦«*♦*♦♦#♦*♦***«***♦»********** 

1520 ♦** FIGURES NIVEAU 5 *** 

1530 ********************************* 

1540 FOR 1=1 TO 2:FOR o=0 TO 2 

1550 f$(i,l+o*4)=ll$(i,o+l)+P$(i,0+2)+p$(i.o+3i 

1560 f$(i,2+o*4)=p$(i,o+l)+ll$(i,0+2)+P$(i.o+3) 

1570 f$(i,3+o*4)=p$(i.o+D+ll$(i.O+2)+P$(i,o+3) 

1580 f$(i.4+o*4)=p$(i,o+l)+P$(i,0+2)+ll$(i.o+3) 

1590 f$(i,13+o*4)=12$(i,o+l> 

1600 «(i.l4+o*4)=p$(i,o+D+13$(i,o+2) 

1610 f$(i,15+o*4)=13$(i,o+2)+p$(i,o+3) 

1620 f$(i.l6+o*4)=12$(i,o+3) 

1630 f$(i,25+o*4)=ll$(i,o+l)+P$(i,0+2)+P$(i,o+3) 

1640 f$(i.26+o*4)=P$(i,o+l>+ll$<i,0+2)+p$(i.o + 3) 

1650 f$(i,27+o*4)=ll$(i,o+2)+ll$(i,o+3) 

1660 f$(i,28+o*4)=13$(i,o+3)+P$(i,o+l> 

1670 f$(i.37+o*4)=p$(i,o+D+ll$(i,o+2)+P$(i,o+3) 

1680 f$(i.38+o*4)=ll$(i,o+2)+ll$(i,o+3) 

1690 f$(i,39+o*4)=p$(i,o+2)+ll$(i,o+3)+P$(i,o+D 

1700 f$(i,40+o*4)=p$(i,o+2)+p$(i,o+3)+ll$(i,o+D 
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>N6 
>NJ 
>VL 
>DU 
>DY 
>VK 
/PD 
/PF 
>EL 
>D6 
>PL 
>ER 
>PQ 
>PY 
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1710 NEXT:NEXT 

1710 RE7URN 

1730 ♦**♦♦♦*********+***************>* 

1740 *** FIGURES NIVEAU 6 *** 

1750 'M******************************* 

1760 FOR i=l TO 2: FOR j=0 TO 2 

1770 «<i,l+J*4)=ll$(i,j+l)*M«i, 



■>HH 
>FD 
>YD 
>YE 
VF 
>VU 
>DT 



1780 f$(i.2+j*4)=p$(i,j+2)+p$(i,j*l)*pi(i,j+3)+p$<i,j+2 

) 

1790 f$(i.3+j*4)=ll$(i.j+2)+ll*(i,j+3) >DZ 

1800 «(i,4+j«4)«p$(i,j*2)+ll$(i,j*3i+p*(i,j*l) >ND 

1810 f$(i,13+j*4)=p*(i.j+l)+p*(i,j+2) + ll*<i,.j+3) /FA 

1820 «<i,14+j»4)=p*(i,i+l)+ll*(i,j+2)+P$(i,j+3) >PC 

1830 f$(i.l5+i*4)=+ll$<i,j+l)+P*(i.j+2).+p*u,.i+3) >QN 

1840 f*<i,16+j*4i=P$(i,.)+2)+p$(i.j*l)+ll$li.j+3) >PG 

1850 rt(i,25+j«4)=p$(i,j+l)+13$(i,j+2) >DD 

1860 f$(i f 26+j«4)=ll$(i,i+l)+P«<i,j+2)+p$(i,i+3) >PK 

1870 f*(i,27tj*4)=p*(i..i+l)+p*u,.;*2)+ll*(i.j+3) >PH 

1880 f*(i,28+j*4i=13*(i, j+2)*p$<i,j+3) /DM 

1890 t$(i.37+j*4)=13*(i..)+l)+P*(i,j+2) -HL 

1900 tt(i,38+j*4)=p$(i,j+2)*p*(i,j+l)*n*(i.i+21 >PG 

1910 f*ii,39+j*4)=ll*(i..j+2)+p*(i.j+3)+P*(i,J+2) FI 

1920 f$(i.40+j*4)=Ptii,j+2)+13$(i.j+3) >DA 

1930 NEXT:NEXT >LB 

1940 RETURN >FH 

1950 m******************************* >YH 

1960 ♦** FIGURES NIVEAU 7 *** >YJ 

1970 «M***************************** 

1980 FOR i*l TO 2: FOR j=0 TO 2 >W 

1990 «(i,l+.j*4)=p$(i,j+l)+p$(i,j+2)*p$(i.j+l)+P$<i,j+3 >YL 

) 

2000 f*U,2+j«4)=P«(i,,i+2)+P*(i.j+l)+p*<i.j+3)+P*(i,.i+l >YU 

) 

2010 f»(i.3+j*4)=p$(i.j+l)+p$ti.j*2)+P*(i,.)+l)+P*(i,j+3 >YW 

) 

2020 f$(i.4*j»4)=p$(i..i*2)+p$(i.j+l>*p$(i,j+3)+P*(i..i+l >YY 

) 

2030 f*(i.l3+.i*4)=P$(i.j+l)tpJii,i+3i+P*(i.j+l'*-P*U,j+ >ZE 

2) 

2040 f*(i,14+)*4)=P«(i,j+3)+p$(i,j+l)+p$(i,j+2)+p$(i,j+ >ZG 

1) 

2050 f$(i,15+j*4)=p$<i,j+l)+p$(i,j+3)+P$li.j+l)+p$(i,j+ >ZJ 

2) 

2060 f*(i.l6+j*4)=p$(i,j+3)+p$(i,j+l)+P$(i,j+2)+p*(i,j+ >ZL 

1) 

2070 «(•:.25tj*4)=p*(i ( j+l)+p$(i,j+2»+p*(i..j+l)+P$ii.j+ >ZL 

2) 

208(i f$(i.26+j«4)=p$(i,j+2)+pt(i.j+l)+P*ii,j+2)+p*U,j+ >ZN 

1» 

2090 t$(i,27+j«4)=p$(i.j+l)+p$(i,.)+3)+P$(i,j+l)+P$U.j + >ZT 

3) 

2100 ti(i,28+j«4)=p»(i,j+3)+P*(i,j*i)+p$(i,j+3)+p$u.j+ >ZK 

1) 

2110 f$(i,37+j*4)=p$(i,j+l)+p*(i.j+3)+p$(i.j+l)+P$(i,j+ >ZL 

3) 

2120 «(i,38+j*4)=p*(i,j+3)+p$(iJ+l)+p$(i,j+3)+p$(i,j+ >ZN 

1) 
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2130 f*ii.39+i*4)=p*(i.,i+lj+p$(i.j+2.t+P*u. i+l(+P*ti..j+ >ZN 

2) 

2140 f$(i,40+)*4)=p$(i.j+2)+P$u.j+lJ+p*(i.,)+2)+P*<i,j+ >ZF 

1) 

2150 NEXT:NEXT >HG 

2160 RETURN FC 

21 70 ' *******+*****■******#**•****«****♦* 

2180 *♦+ FIGURES NIVEAU 8 «* >YB 

2190 **«+«*************♦♦**♦♦#♦«♦♦♦♦♦♦ -E 

2200 FOR i=l TO 2:F0R .1=0 TO 2 Vh 

2210 «<i,l+j«4)=p$(i,j+l)*p$(i,j+3)*p*(i,j+l)+p$(i,j*2 >YM 

) 

ft(i.2+j*4)=p*ti.j+2)+p«(i,.i+l)+P*(i.ji-2ifP$u ) i+3 rZ 
) 
2230 t*u,3+j*4)=p$ii..i+3)+Più,j+2)+P*(i,j+3)+P*(i,.i+l iî 



) 

2240 f*(i.4+j*4)=p$(i 

i 

2250 f*(i.!3+t*4;=p*( 

3) 

2260 t*ii, 14+.i*4) =p$( 

1) 

2270 f$li,15+g*4)=p*( 

2) 

2280 f*li.l6+g*4)=p*< 

1) 

2290 t$ii.25+j«4)=p*( 

1) 

2300 f$(i,26+j«4)=p«( 

2) 

2310 «<i,27+j«4)=p$< 

3) 

2320 f*ii,28+j*4)=P*U 

2) 

2330 rt(i,37*j*4)=p$(i 

2) 

2340 f«(i,38+j*4)=p*(i 

3) 

2350 t«(i,39+j*4)=p*li 

1) 

2360 rt(i,40+j*4)=p*(i,j+l)+p*(i.j+3)*p*(i,j+l)+p$(i,jt AH 

3) 

2370 NEXT:NEXT LA 

2380 RETURN >F6 

2390 ' itmt<tmi««tt(tttinttii.t« 

2400 *** AFFICHAGE FIGURES *** ,XJ 

2410 ***************#*♦***********♦*** >XK 

2420 BORDER 10+r:F0R i=0 TO 5:F0R j=l TO 4:L0CATE 4+1*6 /CM 

,l+j:PRINT f$(l.j+i*4):PEN hLOCATE 3+i*6.4:PRINT CHR$i 

65+i):L0CATE 3+i*6.5:PRINT CHR* (243) :NEXT: SOUND 1,120-i 

*5,10,15,1:NEXT 

2430 FOR i=0 TO 5:F0R j=l TO 4:L0CATE 4+i*6,6+j:PRINT < >KL 

$(l.U+i*4)+24):PEN 1 : LOCATE 3+i*6,9:PRINT CHR$(71+i):L 

OCATE 3+i*6,10:PRINT CHR$ (243) :NEXT: SOUND 1,75-1*5,10,1 

5,1:NEXT 

2440 PAPER#3,3:PEN#3,2:CLSI3 >HD 

2450 RETURN >FE 
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)+1j+p*(i,j+3)+p*u.i+2)+p*u.j+: 
. j+l)+p$!i,..n2.)+Ptii.,ii-l)+P*(i, )+ >ZJ 
, !*2)+P$ii,.)'f3»+P*u,.i+2i+p*(i. i* /ZM 
, j+3)+p$(i,g+l)+p$(i, j+3)+p*(i,j* /ZQ 
..!+l)tp$(i,.i+3)+P*ii.!+2)+P*(i..)+ /ZQ 
, j+3)+p*(i, j+l)+p*u.j+2)+P$(i,j+ /ZR 
,g+l)+p*U..j+2)+P*(i.i+3)+p*(i,j+ :• 
.i+T^P*(i.j+l)+P$(i.jt2)+P*(i.j+ ZN 
, j+2)+p*(i, j+3)+p*':i,j+l)+P*(i.j+ /ZP 
,j+3)+p»li.j+2)tp$(i.j+l)+p$(i,j+ >ZQ 
,j+2)+p*(i.j+l)+p*(i,j+2)+p$(i,j+ /ZT 
,j+3)+p*(i,j>2)+p*(i..j+3)+p$u.j+ ZN 



©^ 



2460 LOCATE 4, 14:PRINT"M0DELE VOTRE DESSIN" >VX 

2470 PEN 2:L0CATE 30.15:PRINT "Niveau: ":r >LT 

2480 L0CATE#2.1.1:PRINT#2. "Score: 0" >FH 

2490 L0CATE#2,1.3:PRINT#2." Sur: 0" ED 

2500 IF t=5 THEN t=0:sc=0: SOUND 1,60.20, 15,1: SOUND 1,47 >EV 

.20, 15.1: SOUND 1,40,30, 15,1: FOR tt=0 TO 500:NEaT:G0T0 4 

20 

2510 »*♦#**#*#**♦*♦*♦*♦**#«♦♦*****♦«*** ïh 

2520 **♦ AFFICHAGE MODELE *** YB 

2530 »**»»♦*##***##**♦****«♦«#♦♦***♦*«* 

2540 H1=INT(RND*12)+1 >FK 

2550 t=ttl:RANDOMIZE TIME 

2560 H2=INT(RND»12)+1:IF H2=H1 THEN 2560 66 

2570 PRINTttl. CHF;*(22)+CHR*il) f.l 

2580 FOR i=l TO 4:LQCATE#1.4,i:PMNT#l,f*(l. (hl«4)-4+u VF 

:L0CATE#1.4,i:PRINT#l.f*(2.ih2*4)-4+i):NEAT:S0UND 1,63. 

40,15,1 

2590 **###*****♦****«♦#*♦«»♦**«*♦*#♦*** I VJ 

2600 ♦** REPONSE ET AFFICHAGE ♦** >Yfl 

2610 ********************************** ; YB 

2620 FOR i=l TO 2 >BK 

2630 r$<w=INKEY*:IF r$d)="' THEN 2630 ;EH 

2640 R$(li=UPPERt<R*(I>) >TU 

2650 IF r$(i)<"A" OR r«(i)>"L" THEN PRINT CHM(7):60TD >AG 

2630 

2660 60SUB 2890 ff 

2670 PEN#l,2:L0CATE#l,l8.i*2:PRINT#l.r$(i) >LF 

268<j NEXT >LH 

2690 L0CATE#1.6.7:PRINT#l."Confir«ez 0/N" Pu 

2700 r$=INKEr$:IF r$="" THEN 2700 >ZQ 

2710 r*=UPPER»(r$j:IF r*="0" THEN 2750 >DK 

2720 PRINT CHR$*22)+CHR*(0) >V6 

2730 IF r$="N" THEN SOUND 1.200, 120, 15, l:PENttl.O:FOR i= -EQ 
1 TO 2:L0CATE#l,18,i*2:PRINT#l.CHR$(143):NEXT:L0CATE#l. 
6,7:PR1NT#1.STRING$(13.143):GOTO 2620 
2740 PEN#1,2:PRINT CHR*(22)+CHR$U) >CT 

2750 al=ASC(r$(l»)-64:a2=ASC(r$(2)»-64 ;EW 

2 7 60 FOR i=l TO 4:L0CATE#l,20,i:PRINT#l.+$(l,(al*4)-4+i >0M 
):L0r.ATE#l,20,i:PRINT#l,f*(2,(a2*4)-4+i):NEXT 
2770 L0CATE#2,7,3:PRINT#2,t >H 

2780 PRINT»l,CHft*(22)+CHR$(0) XJ 

2790 IF ial=hl AND a2=h2)0R(a2=hl AND al=h2) THEN 2800 H.C 
EL5E GOTO 2810 

2800 SOUND 1,80.20, 15. 1:S0UND 1,60,15,15,1:L0CATE #3,2, >XP 
l:PRINT#3,"JUSTE":sc=sc+l:L0CATE#2.7,l:PRINT#2.sc:L0CAT 
EK1.2, 7: PRINT#1. "Appuyez sur la barre":CALL iB618:CLSttl 
:CLS#3:6OT0 2500 

2810 GOSUB 2880 >YB 

2820 SOUND 1,400,40, 15,,, 7.-L0CATE #3.2, 1:PRINT#3, "Faux" /PB 
:PEN#1.3:L0CATE#l,2,2:PRINT#l,CHRt(64+hl):L0CATE#l,2,4: 
PRINT»l,CHR$(64+h2):PEN#l,l:L0CATE#l,2,7:PRINT#l,"Appuy 
e: sur la barre":CALL îeBB18:CLS#l:CL3#3:G0T0 2500 
2830 #*♦*♦♦*♦**«**♦*******♦***««***♦♦* >YF 

2840 «** DESSIN CADRES *** >YG 

2850 '****»♦**«******♦***♦*****■»§**#*♦« >YH 

2860 PLOT 0.0. 1:DRAW 639.0:DRAW 63?,399:DRA« 0.399 : DRAW >U0 

Û,0:PLOT 2,2:DRAW 637,2:DRAW 637,397:DRAN 2,397:DRAW 2 
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,2:RETURN 

2870 PLOT 0.220:DRAK 639.220:PL0T 0.222:DRAW 639,222:RE Eu 
TURN 

2880 PLOT 30,73,3:DRAW 50,78:DRAh 50. 13*J:DRAW 30.130:DR ,-TP 
Aw 30.78:RETURN 

2890 PLOT 2B6,78,3:DRA*g 306.78:DRAW 30û,130:DRA* 286.13 >AC 
0:DRAW 2B6,78:RETURN 

2900 ********************************* lu 

2910 ♦♦* PRESENTATION ♦♦♦ tE 

2920 '♦♦♦*»************»*#t#*#*****«*« ..yF 

2930 FOR i=l TO 37 STEP 4 >QE 

2940 FOR j=l TO 24 STEP 1 92 

2950 LOCATE i,j:PRINT f«(l,j MOD 12+1) ED 

2960 SOUND l.INT(RND*8)*5+60,5,10,l CZ 

2970 NEXT: NEXT :>LG 

2980 FOR i=l TO 37 STEP 4 ;RB 

2990 FOR .1=1 TO 24 STEP 1 ;QE 

3000 LOCATE i,.j: PRINT f$(2,j+12) 

3010 NEXT: It* 1,INT(RNB*25)+1:INK 2, INT(RND*25)+1: II*:. 3 >BH 
,INT(RND*25)+1: SOUND 1,INTiRND*6)+5+120,5.15.1:NEaï 
3020 q$(l)="1110111010101000111110111010001H" 
3030 q*(2)="100010101010100010101010001000101" >KC 

3040 q$(3)= ,, 100010101010100010101011001000101" KF 

3050 q*(4)="10001010101010001010101000100010r' »K6 

3060 q$(5)="111011101110111010101Û111011101H" ;KW 

3070 INK 0.0:11*:. 1,5: M 2.20:INk 3,15 >DG 

3080 FOR i=l TO 5:F0R j=l TO 33: IF MID$(q$(i), j.l)="l" >RC 
THEN PEN 0:LOCATE 3+j,10+i:PRINT CHR*( 143): SOUND 1.- 
5,15.2:SOUND 1.0.10,0,0 
3090 NEXT: NEXT 

3100 FOR i=l TO 30: INK 1,INT(RND*26):1NK 2,INT(RND*2cw: 
INK 3,INT(RND*25):S0UND 1,800.5, 15,1: SOUND 1,Û.10,15:NE 
XT 

3110 INK 0.0: INK 1,6: INK 2, 11: INK 3.24 
3120 LOCATE 7,20:PRINT "JEU DES MELANGES DE COULEURS" .AH 
3130 FOR tt=0 TO 5000:NEXT 
3140 **t**»******»***«fr**t***t*t****»« 
3150 *♦♦ EXPLICATIONS *♦* r& 

3160 ' ********************************* 
3170 CL3:B0RDER 13:PEN 1: GOSUB 2860:L0CATE 2.3:PRINT"Le *E 
s couleurs se mélangent:" 

3180 P*(l,4)=p$(l,l):p$(2,4)=p$(2,l) Br 

3190 FOR k=0 TO 2: FOR i=l TO 4:F0R j=l TO 4:L0CATE 5+i. M 
5+j+k*6: PRINT P$(l,k+1):NEXT:NEXT:NEXT 
3200 FOR k=0 TO 2:F0R i=l TO 4:F0R j=l TO 4:LXATE 13+i >DL 
,5+j+k*6:PRINT P$(l,k+2 ): NEXT: NEXT: NEXT 
3210 FOR k=0 TO 2:F0R i=l TO 4:F0R j=l TO 4:L0CATE 21*i >TK 
,5+j+k«6:PRINT p$(l,k+l hLOCATE 21+i,5+j+k*6:PRINT p«( 
2, k+2): NEXT: NEXT: NEXT 

3220 FOR 1=0 TO 2:L0CATE 11.7+i*6:PRINT "+":NEXT >QX 

3230 FOR i=0 TO 2:L0CATE 19.7+i»6:PRINT "=":NEXT >0B 

3240 PEN 2:L0CATE 27,6:PRINT"rouge+bleu=":L0CATE 31,8:P >MQ 
RINT"violet":LOCATE 27,12:PRINT"bleu+jaune=":L0CATE 31, 
14:PRINT"vert":L0CATE 27, 18:PRINT" jaune+rouge=": LOCATE 
31,20:PRINT"orange" 

3250 LOCATE 2,23:PRINT "Appuyez sur une touche" AT 

3260 CALL &BB18:CLS:RETURN M* 
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ASCII - BINAIRE 
CONVERSION 



Emmanuel SCHOHN 




Ces deux programmes sont 
destinés à faciliter l'usage 
d'un MODEM : celui-ci ne 
transférant que des fichiers 
ASCII, on ne peut échanger 
des programmes en 
BINAIRE. C'est dans ce but 
que j'ai créé ces utilitaires. Ils 
permettent de travailler avec 2 
lecteurs de disquettes et 
possèdent quelques messages 
d'erreurs. 



Ol est possible de convertir des 
programm es allant jusqu'à 42 
Ko ainsi que des images écran 
de 17 Ko. Dès que le chargement est 
effectué, le bord de l'écran clignotera. 
Il faut alors mettre la disquette destina- 
tion et appuyer sur une touche. 
Quand le programme ne se trouve pas 
sur la mémoire écran, celle-ci sert de buf- 
fer pour le programme ASCII. Un Hea- 
der artificiel est sauvegardé avec celui- 
ci ; il contient : le nom d'oriqine, sa lon- 
gueur, les adresses de début, de lon- 
gueur et d'exécution, ainsi que les type 
de programmes. 
Les programmes ASCII créés par BI-AS 



se reconnaissent à leur extension .MDM. 

Il faut impérativement utiliser AS-BI pour 

l'utilisation inverse (à cause du Header 

artificiel). 

Ces programmes .MDM pourront être 

transférés par MODEM. 

Attention, les 2 listings "Assembleurs" 

ne sont pas à entrer si vous ne possédez 

pas le programme adéquat. 




■ - ». * 




..<■»' -v /••«. 






10 REST0RE.F0R R=i4000 T0 &4262.READ A$:P0KE R,vAL("&"+ 

A$):ICXT:P0KE M016.M0 

20 PRINT'Appuyez sur une touche pour sauver BI-AS. 

BIN-.PRINT.CALL &BBlB:SAVE n BI-AS.BIN\B,fc4000, 8.263, &400 

O-.NEH 

30 DATA 01,00,00,C5,CD,38,BC V C1 

40 DATA AF,CD,32,BC,01,0D,0D,3E 

50 DATA 01, CD,32,BC,21, 22,05,11 

60 DATA 00,A8,01,41,02,ED,BO,C3 

70 DATA 00,A8,0E,07, 11,40,00,21 

80 DATA FF,B0,CD,CE,BC,3E,02,CD 

90 DATA 0E,BC,21,4C,A9,CD,42,A9 

100 DATA CD,18,BB,CD,5A,BB,FE,42 

110 DATA 20,04,3E,01,18,06,FE,62 

120 DATA 28,F8,3E,00,32,00,AC,21 

130 DATA 5C,A9,CD,42,A9,CD,1B,BB 

140 DATA 11,00,60,CD,9B,BC,21,A4 

150 DATA A9,CD,42,A9,06,0C,21,70 

160 DATA AA,CD,18,BB,CD,5A,BB,FE 

170 DATA 0D,28,08,FE,7F,28,AB,77 

180 DATA 23, 10, EE, 36, 00, 3E, 0C, 90 

190 DATA 32, 6F, AA, 11, 00, C0, 21, 70 

70 



>DH 



>HT 



>XF 
>YF 
>XU 
>XP 
>XJ 
>YY 
>YG 
>ZC 
>YT 
>YF 
>ZD 
>YH 
>YK 
>ZP 
>YC 
>YN 
>YC 



200 DATA 
210 DATA 
220 DATA 
230 DATA 
240 DATA 
250 DATA 
260 DATA 
270 DATA 
280 DATA 
290 DATA 
300 DATA 
310 DATA 
320 DATA 
330 DATA 
340 DATA 
350 DATA 
360 DATA 
370 DATA 
380 DATA 
390 DATA 
400 DATA 
410 DATA 
420 DATA 
430 DATA 
440 DATA 
450 DATA 
460 DATA 
470 DATA 



AA,47,CD,77,BC,D2,2A,A9 


>ZY 


FE,16,CA,36,A9,ED,53,7D 


>ZU 


AA,ED,43,7F,AA,32,83,AA 


>ZT 


3E,BF,BA,38,09,01,00,C0 


>YR 


ED,43,84,AA, 18,07,01,00 


>YH 


B0,ED, 43,84, AA,E5,DD,E1 


>Z0 


DD,4E,1A,DD,46,1B,ED,43 


>ZC 


81,AA,EB,CD,83,BC,D2,2A 


>ZP 


A9,CD,7A,BC,01,00,OD,CD 


>ZP 


38, BC, CD, 18, BB, 01, 00, 00 


>YR 


CD,38,BC,21,70,AA,11,60 


>YP 


AA,06,0C,7E,FE,2E,20,06 


>YP 


3E,0C,0E,04,18,0F,FE,00 


>YV 


20, 06, 3E, 08, 0E, 08, 18,05 


>Y6 


12,23, 13, 10,E6,D5,DD,E1 


>YF 


DD,36,00,2£,DD,36,01,4D 


>YC 


DD,36,02,44,DD,36,03,4D 


>YR 


90,81, 47, 3A,6F,AA,32,7C 


>YA 


AA,21,60,AA,ED,5B,84,AA 


>ZR 


CD,8C,BC,D2,2A,A9,21,70 


>ZK 


AA,06,14,7E,CD,95,BC,23 


>YX 


10,F9,2A,7D,AA,ED,5B,7F 


>ZE 


AA,7E,23,CD,95,BC,30,0C 


>ZC 


1B,3E,FF,BA,20,F3,CD,8F 


>ZH 


BC,C3,00,A8,21,CF,A9,CD 


>ZV 


42,A9,CD,18,BB,C3,00,A8 


>YX 


21,1C,AA,CD,42,A9,CD,18 


>ZD 


BB,C3,00,A8,7E,FE,00,C8 


>ZK 
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480 DATA 
490 DATA 
500 DATA 
510 DATA 
520 DATA 
530 DATA 
540 DATA 
550 DATA 
560 DATA 
570 DATA 
580 DATA 
590 DATA 
600 DATA 
610 DATA 
620 DATA 
630 DATA 
640 DATA 
650 DATA 
660 DATA 
670 DATA 
680 DATA 
690 DATA 
700 DATA 
710 DATA 
720 DATA 
730 DATA 
740 DATA 
750 DATA 
760 DATA 
770 DATA 
780 DATA 
790 DATA 



CD 


5A 


BB, 


63 


74 


65, 


42 


20 


3A, 


49 


6£ 


73, 


76 


6F, 


74, 


73 


71 


75, 


61 


76, 


65, 


20 


50 


72, 


6D 


65, 


73, 


61 


6E 


73, 


20 


65, 


6E, 


49 


2E 


OD, 


70 


65 


7A, 


4F 


4D 


20, 


6F 


67 


72, 


61 


20 


54, 


65 


72 


65, 


00 


0A 


OA, 


72 


20 


64, 


74 


75 


72, 


69 


74 


75, 


4C 


65 


20, 


61 


6D 


6D, 


20 


70 


61, 


20 


54 


72, 


72 


65 


,20, 


43 


49 


49, 


4C 


65 


,20, 


61 


6D 


,6D, 


52 


,43 


,45, 


65 


6E 


20, 


2E 


,07 


,00 



,23,18,F6,4C,65 
,75,72,20,41,2F 
,20,07,00,OD,OA 
,65,72,65,7A,20 
,72,65,20,44,69 
,65,74,74,65,20 
,63,20,60,65,73 
,6F, 67, 72,61,60 
,20,61,20,54,72 
,66,65,72,65,72 
,20,41,53,43,49 
,OA,07,00,54,61 
,20,6C,65,20,4E 
,64.75,20,50,72 
, 61, 6D, 60,65,20 
,72,61,6E,73,66 
,72,2O,3A,2O,07 
,45,72,72,65,75 
,65,20,4C,65,63 
,65, 2F, 45, 63, 72 
,72,65,20,3A,20 
,50,72,6F, 67,72 
,65,20,6E,27,61 
,73,20,65,74,65 
,61,6E,73,66,65 
,65,6E,20,41,53 
,2E,O7,OO,0D,0A 
,50,72,6F, 67,72 
,65, 20, 53, 4F, 55 
,20,65,73,74,20 
,41,53,43,49,49 



>ZC ' 

>YP 

>XE 

>YH 

>YY 

>YB 

>YQ 

>YD 

>YE 

>YC 

>YF 

>YE 

>YH 

>YQ 

>YB 

>YK 

>X6 

>YN 

>YG 

>YB 

>YP 

>YK 

>YT 

>XU 

>YP 

>YC 

>YF 

>Y6 

>YA 

>XY 

>YV 

>GJ. 




10 RESTORE: FOR R=*4000 TO &422A:READ A$:POKE R, VAL <"V+ >DQ 
ADiNEXTtPOKE &4021.MO 

20 PRINT'Appuyez sur une touche pour sauver AS-BI. >HE 
BIN":PRINT:CALL Ï.BB18: 5AVE"AS-BI . BIN" , B, Ï.4000, &22B, &400 
0:NEW 

30 DATA OE, 07, 11, 40, 00, 21, FF, BO >XV 

40 DATA CD, CE, BC, 01, 00, 00, C5, CD >YA 

50 DATA 38,BC,C1,AF,CD,32,BC,01 >YL 

60 DATA 0D,0D,3E,01,CD,32,BC,21 >XC 

70 DATA 2D,05,11,00,A8,01,FE,01 >XZ 

80 DATA ED,B0,C3,00,A8,3E,02,CD >YV 

90 DATA 0E,BC,21,02,A9,CD,F8,A8 >YJ 

100 DATA CD,18,BB,CD,5A,BB,FE,42 >ZC 

110 DATA 20, 04, 3E, 01, 18, 06, FE, 62 >YT 

120 DATA 28,F8,3E,00,32,00,AC,21 >YF 

130 DATA 12,A9,CD,F8,A8,CD,18,BB >ZF 

140 DATA 11,00,60,CD,9B,BC,21,57 >YC 

150 DATA.A9,CD,F8,A8,06,0C,21,4O >YG 
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160 DATA AA,CD,18,BB,CD,5A,BB,FE 
170 DATA 0D,28,O8,FE,7F,28,B6,77 
180 DATA 23,10,EE,36,00,3E,OC,90 
190 DATA 32,4F,AA,11,00,C0,ED,53 
200 DATA 64,AA,CD,D6,A8,3A,5E,AA 
210 DATA FE,CO,20,OA,11,00,80,ED 
220 DATA 53,64,AA,CD,D6,A8,2A,5D 
230 DATA AA,E0,56,5F,AA,CD,80,BC 
240 DATA 77,23, 1B,3E,FF,BA,20,F5 
250 DATA CD,7A,BC,01,00,0D,CD,38 
260 DATA BC, CD, 18, BB, 01, 00, 00, CD 
270 DATA 38,BC,21,50,AA,3A,5C,AA 
280 DATA 47,ED,5B,64,AA,CD,8C,BC 
290 DATA 30,19,2A,5D,AA,ED,5B,5F 
300 DATA AA,ED,4B,61,AA,3A,63,AA 
310 DATA CD,98,BC,30,06,CD,BF,BC 
320 DATA C3,00,A8,21,86,A9,CD,F8 
330 DATA A8,CD,1B,BB,C3,00,A8,21 
340 DATA D3,A9,CD,F8,A8,CD,18,BB 
350 DATA C3,00,A8,D5,CD,7D,BC,D1 
360 DATA 21,40,AA,3A,4F,AA,47,CD 
370 DATA 77,BC,30,D7,FE,16,20,DF 
380 DATA 06,14,21,50,AA,CD,80,BC 
390 DATA 77,23, 10,F9,C9,7E,FE,00 
400 DATA C8.CD,5A,BB,23,18,F6,4C 
410 DATA 65,63,74,65,75,72,20,41 
420 DATA 2F,42,20,3A,2O,O7,00,0D 
430 DATA 0A,49,6E,73,65,72,65,7A 
440 DATA 20,76,6F,74,72,65,20,44 
450 DATA 69,73,71,75,65,74,74,65 
460 DATA 20,61,76,65,63,20,60,65 
470 DATA 73,20,50,72,6F, 67,72,61 
480 DATA 6D,6D,65,73,20,41, 53,43 
490 DATA 49,49,20,61,20,54,72,61 
500 DATA 6E, 73, 66, 65, 72, 65, 72, 2E 
510 DATA 0D,0A,07,00,54,61,70,65 
520 DATA 7A,20,6C,65,20,4E,4F,4D 
530 DATA 20,64,75,20,46,69,63,68 
540 DATA 69,65,72,20,41,53,43,49 
550 DATA 49, 20, 61, 20, 54, 72, 61, 6E 
560 DATA 73,66,65,72,65, 72,20,3A 
570 DATA 20,07,00,0D,0A,45,72,72 
580 DATA 65,75,72,20,64,65,20,40 
590 DATA 65,63,74, 75, 72,65,25,45 
600 DATA 63,72,69,74,75,72,65,20 
610 DATA 3A, 20, 60, 65, 20, 46, 69, 63 
620 DATA 68,69,65,72,20,6E,27,61 
630 DATA 20,70,61,73,20,65,74,65 
640 DATA 20,54,72,61, 6E,73,66,65 
650 DATA 72,65,20, 65,6E, 20,42,69 
660 DATA 6E,61,69,72,65,2E,07,00 
670 DATA 0D,0A,4C,65, 20,50,72,6F 
680 DATA 67, 72,61, 6D,6D,65,20,53 
690 DATA 4F, 55, 52, 43, 45, 20, 6E, 27 
700 DATA 65,73,74,20,70,61,73,20 
710 DATA 65, 6E, 20, 41, 53, 43, 49, 49 
, 720 DATA 2E,07,00 
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TROUBADOURS 




C'est en allant par 
monts et par vaux que 
je fis la rencontre de 
ces deux charmants 
troubadours qui parcouraient 
tout le pays en grattant sur leurs 
violes en composant des poèmes 
qu'ils allaient réciter ou chanter 
dans les châteaux des nobles sei- 
gneurs qui voulaient bien les 
accueillir. En cette belle soirée 
de printemps, autour d'un 
superbe feu, les deux baladins 
décidèrent de me raconter leur 
aventure. 

Tout avait commencé au carre- 
four de la croix du destin avec 
la rencontre de l'enchanteur 
Corwin qui attendait depuis 
longtemps l'arrivée de deux 
troubadours ; seulement était- 
ce les bons ? Un seul moyen 
pour le savoir : passer avec suc- 
cès le test sur les contes ou les 
légendes, ce qui n'était pas tou- 
jours facile, car vous, sauriez- 
vous répondre aux questions 
suivantes : combien de femmes 
épousèrent le méchant Barbe 
Bleue, combien de voyages 
Sindbad le marin a-t-il fait ou 




Autre épreuve ■ Passer à 1* suite 




quel était l'âge de la Belle au 
bois dormant lorsqu'elle se 
piqua ?... Malgré tout, cette 
épreuve étant réussie, ils parti- 
rent à la recherche du gnome 
musicien Dworkin qui, grâce à 
deux épreuves musicales, leur 
donna de précieux indices pour 
continuer l'aventure et réussir à 
délivrer la belle princesse 
Viviane captive au château du 
Roc Noir. 

Continuant leur chemin, ils 
firent alors une étrange rencon- 
tre avec un poète très distrait ; 
en effet, pour commencer, 
celui-ci avait mélangé les vers de 
deux poésies et il n'arrivait pas 
à les reconstituer séparément 



(heureusement que nos deux 
compères étaient là !). Mais ce 
poète, décidément très distrait 
avait un second problème : il 
avait écrit en prose tout un 
poème et n'arrivait pas à retrou- 
ver les coupures pour reformer 
les vers ! Là encore, la compé- 
tence des troubadours fit des 
prouesses et c'est ainsi qu'ils 
purent enfin arriver en vue de 
l'inquiétant château du Roc 
Noir. 

Avant de réussir à voir la prin- 
cesse pour lui chanter une 
aubade qui lui permettrait de 
reconnaître en eux ses futurs 
sauveurs, les deux baladins doi- 
vent tracer un portrait du sei- 



V 1 




*- V 



Lankhor 



gneur qui ne soit pas trop flat- 
teur mais qui plaise au maître 
des lieux (autant dire qu'ils 
n'avaient pas intérêt à tracer un 
portrait du seigneur tel que les 
serfs le voyaient !). 
Et c'est ainsi que l'histoire finit 
par bien se terminer et nos deux 
troubadours furent même auto- 
risés à participer au jeu de l'Ar- 
cher dans lequel ils durent for- 
mer le plus grand nombre pos- 
sible de mots des lettres à par- 
tir de 6 lettres données. C'est le 
seul cas où nos troubadours 
furent adversaires, car il était 
possible de faire les 5 manches 
à 2 joueurs... 

Suivant le principe que nous 
avions découvert avec Au nom 
de l'Hermine, Troubadours 
réussit à réunir le principe de 
l'aventure à celui de l'éducatif. 
L'histoire se passant au Moyen 
Age, ce logiciel permet à l'en- 
fant de progresser sur la con- 
naissance des contes et des 
légendes d'une part et dans le 
maniement de la langue fran- 
çaise en prose ou en poésie 
d'autre part. Le caractère édu- 
catif est bien servi par la réali- 
sation du programme tout au 
niveau du graphisme que de la 
musique tant en considérant 
l'originalité du sujet traité. A 
posséder* 
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Mange 

cailloux 

Ubi Soft 
Arcade 



Avec ce logiciel, c'est un 
grand sujet classique 
qui revient à l'écran ; 
en effet, le petit pin- 
gouin est de retour avec ses 
petits cubes et ses petits dia- 
mants à aligner... 
Bien entendu, dans chaque 
tableau, il ne faut pas oublier 
ces affreux gloutons qui vont 



chercher à anéantir le pingouin 
quitte à devoir briser des cubes. 
Il faut savoir que ce charmant 
pingouin doit réussir à aligner 
3 diamants pour obtenir un 
bonus mais qu'il doit également 
supprimer un certain nombre de 



gloutons pour accéder au ta- 
bleau suivant. 11 existe aussi des 
tableaux spéciaux comme par 
exemple le 3ème tableau qui est 
un défi dans lequel vous devez 
aligner les 3 diamants dans un 
temps donné... 



Mange Cailloux n'apporte rien 
de neuf et a le désavantage de 
rester sur le fond bleu de .l'Ams- 
trad ; malgré tout, les nostalgi- 
ques de grands classiques trou- 
veront de quoi se défouler avec 
ce logiciel. 






L'ARCHE DU 
CAPTAI N BLOOD 



Ere Informatique 
Aventure 



Si vous avez le bonheur 
d'insérer la disquette 
de ce logiciel dans le 
lecteur de votre CPC, 
attendez-vous à vivre une his- 
toire fantastique ! Tout 
d'abord, il faut savoir que vous 
incarnez Blood et que vous êtes 
aux commandes d'une Arche se 
laissant ballotter doucement par 
la houle magnétique. Tout irait 
pour le mieux si une attaque 
soudaine n'obligeait Blood à se 
propulser dans l'hyperespace... 
Blood réchappe de cet épisode 
mais pas indemne car, en effet, 





dans cette opération cinq clones 
de Blood se sont créés. A partir 
de cet instant, Blood ne va plus 
vivre que pour récupérer ces 
morceaux de lui-même en allant 
de planète en planète (qui cons- 
tituent la galaxie de l'Hydra) et 
en apprenant à connaître cha- 
que peuple qui vit sur telle ou 
telle planète afin de pouvoir 
faire la différence entre les 



Izwal, Buggol Yukas, Croolis 
ou autres... 

Seulement, saura-t-il retrouver 
les 5 numéros contenant le 
fluide glacial nécessaire à sa sur- 
vie avant que sa main ne 
devienne par trop tremblante ne 
lui permettant plus alors de con- 
tinuer à diriger l'Arche ? 
Voici une aventure qui vaut 
véritablement la peine d'être 



vécue aussi bien au niveau de 
l'intérêt du scénario que de la 
beauté des graphismes et de 
l'animation. Après avoir connu 
un grand succès sur Atari, on 
pouvait craindre que l'adapta- 
tion sur Amstrad ne soit déce- 
vante mais heureusement il n'en 
est rien et c'est avec joie que 
vous pouvez embarquer sur 
cette Arche. 
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Beyond THE 

ICE PALACE 

Elite 
Arcade 



Accepteriez-vous le 
temps d'un jeu de 
devenir un beau, grand 
et fort Vilcing ? En ef- 
fet, c'est ce qu'évoque le héros 
de ce jeu tout de vert vêtu avec 
une ceinture jaune coordonnée 
à ses longs cheveux blonds. 
Vous vous trouvez dans un 
monde où se livre une perpé- 
tuelle bataille entre le bien et le 
mal ; votre mission consiste 
donc à ramener la paix dans ce 
pays et pour cela vous disposez 
d'une part, d'une petite pano- 
plie d'armes (3 différentes) et 
d'autre part, d'une aide un peu 




vide... Vous disposez de deux 
masques au début du jeu, mais 
si vous naviguez un peu dans 
chaque niveau, vous avez la 
possibilité d'en récupérer d'au- 
tres. A propos de niveau, pour 
en changer, il faut anéantir une 
espèce de chenille qui, croyez- 
moi, est assez coriace... 
Beyond the ice palace est un 
bon programme tant au niveau 
de l'animation que du gra- 
phisme ; par ailleurs, tout 
joueur devra être conscient du 
fait qu'il lui faudra beaucoup de 
dextérité pour réussir à 
progresser... 



fantastique puisque nous nous 
trouvons dans un monde magi- 
que. Bien évidemment, de nom- 
breux lutins de mauvais augure, 
d'étranges créatures et autres 
vont s'empresser de vous faire 



passer dans l'au-delà mais il 
faut savoir que si vous vous sen- 
tez un peu trop assailli de tou- 
tes parts, votre masque magique 
est là pour faire le grand 
ménage de votre écran par le 




Nebulus 



o a a • 



Hewson 
Arcade 



C 



SL 



Le moins que l'on puisse 
dire, c'est qu'il s'est 
passé des choses bizar- 
res sur Nebulus ! En 
effet, il se trouve que des tours 
géantes ont été construites sur 
la mer et, qui plus est, sans 
aucune autorisation... Il en 
résulte que vous êtes chargé de 
vous rendre, à bord de votre 
petit sous-marin, dans chacune 
de ces tours et de les détruire ! 
Seulement pour arriver à vos 
fins vous devez aller en haut de 
chaque tour pour la voir se 
désagréger... Et, comme par 




hasard, chaque tour est bien 
gardée. Que ce soit dans la tour 
des yeux ou dans celle du 
royaume des robots, par exem- 
ple, vous avez des ennemis des- 
tructibles, d'autres immobilisa- 
bles et d'autres encore contre 
lesquels vous ne pouvez rien, 



sinon ruser ! De plus, vous allez 
réaliser toute la difficulté de 
l'entreprise à mener lorsque je 
vous aurai dit que chaque des- 
truction de tour se fait dans un 
temps donné qui vous est im- 
parti suivant la tour considé- 
rée... Alors, bon courage ! 



Avec Nebulus, vous avez dans 
les mains un futur hit ! En effet, 
les graphismes sont superbes 
(c'est presque du Commodore) 
et la rotation en 3D de la tour 
risque de vous émerveiller. Bref, 
Nebulus est un jeu d'arcade à 
posséder dans sa logithèque. 
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Venom strikes 

BACK 

Gremlin Graphics 
Arcade/Aventure 



^\ i vous pensiez en avoir 
J^ fini avec les exploits 
i^ qu'accomplissent tous 
%J les membres de l'équi- 
pe Mask, alors vous avez tout 
faux ! En effet, ayant déjà deux 
victoires à son actif, Mask 
revient à l'écran avec pour 





gresser et parvenir jusqu'au 
cœur même de la base. 
Lorsque vous découvrirez les 
premiers écrans de ce logiciel, 
vous trouverez certainement re- 
grettable le fait que les graphis- 
mes et surtout les couleurs fas- 
sent tant penser au Spectrum ; 



il faut reconnnaître que l'Ams- 
trad a quand même d'autres 
possibilités au niveau des cou- 
leurs ! Ceci mis à part, l'anima- 
tion est correcte, les sprites ont 
une bonne (aille et l'utilisation 
du logiciel est simple. A vous de 
juger ! 



objectif la base de Venom, sur 
laquelle Mayhem retient prison- 
nier le fils de Matt Trakker qui 
est bien sûr le héros incontesté 
de l'équipe Mask... 
N'écoutant que son courage et 
sa fibre parternelle, Matt Trak- . 
ker prend le chemin de la base 
Venom sachant qu'il n'a pres- 
que pas de renseignements sur 
les dernières armes mises en ser- 
vice par Venom. Il va donc fal- 
loir compter uniquement sur les 
masques qu'il va pouvoir ra- 
masser en chemin (il y en a 10 % 
en tout) et qui, après expé- 
rience, pourront être utilisés à 
bon escient pour pouvoir pro- 






OABRIELLE 

Ubi Soft 
Arcade/Aventure 



^%'est en l'an de grâce 

I 3001 qu'il vous est 

Hl «proposé de vivre cette 

BM^Ffantastique aventure 

dite "de récupération d'âmes 

repenties". Comment ces âmes 

en sont-elles arrivées là ? Il y a 



bien longtemps, un gigantesque 
conflit nucléaire a réduit la terre 
à néant. Pour punir les respon- 
sables, il fut décidé de faire errer 
leurs âmes en enfer jusqu'à ce 
qu'un magnifique ange blond, 
du nom de Gabrielle, vienne les 
chercher pour leur faire goûter 
au paradis. 

Vous êtes chargé de conduire 
Gabrielle dans les méandres de 
la terre qui est infestée d'enne- 
mis qui vont chercher à l'anéan- 
tir. Heureusement deux aides 
s'offrent à vous : vous pouvez, 
d'une part, récupérer des petits 
anges qui redonnent une vie 



supplémentaire et de la vitalité 
et vous pouvez d'autre part, 
ramasser des cœurs qui permet- 
tent de nettoyer l'écran de tous 
les ennemis lorsque ceux-ci sont 
un peu trop nombreux. Ceci 
étant dit, il faut que vous trou- 
viez une clé en or qui vous per- 
mettra d'ouvrir la porte et, lors- 
que vous êtes en enfer, comme 
c'est plus dur d'en réchapper, il 
faut trouver d'abord un détona- 
teur afin de libérer l'accès à la 
clé... 

Mais, d'après vous, qu'y a-t-il 
derrière la porte du paradis ? 
Une seule solution pour le 
savoir : jouer avec ce logiciel 




qui présente un superbe gra- 
phisme et une bonne animation 
dans l'ensemble bien que les 
déplacements se trouvent ralen- 
tis lorsqu'il y a de nombreux 
sprites à l'écran. Malgré tout, 
n'hésitez pas à aller vous brû- 
ler les ailes avec Gabrielle. 
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Gee BEE 

AIR RALLY 

Acfivision 
Simulation 



^\ omme tout bon pilote 
^J que vous êtes, "vous 
!■ commencez par faire le 
^Ê0 tour de votre appareil 
qui, entre parenthèses, n'est 
autre que le Gee Bee, surnommé 
cercueil volant par un pilote, 
qui peut aller jusqu'à 500 km/h. 
Une fois les vérifications d'usa- 




ge réalisées, vous vous installez 
aux commandes et faites votre 
check-liste. Vous êtes alors fin 
prêt pour débuter votre pre- 
mière course contre la montre. 
Voici comment une course se 
déroule : vous devez effectuer 
un parcours dans un temps 
donné tout en restant dans les 
limites fixées du circuit et en évi- 
tant les autres concurrents. 
Chaque niveau du jeu est cons- 
titué de 4 courses avec un niveau 
de difficulté croissant en ce qui 
concerne le nombre d'adversai- 
res mais, rassurez-vous, ils ne 
sont pas très nombreux sur la 
version Amstrad !... A noter 
que la dernière course de cha- 
que niveau constitue un événe- 
ment spécial ; ainsi au premier 
niveau, vous devez ramasser le 
plus grand nombre de ballons et 
au deuxième niveau, vous devez 
effectuer un savant slalom... 
Durant toutes ces courses, ne 
vous prenez pas pour un 
surhomme car si vous frôlez 
d'un peu trop près vos adversai- 




res, vous serez obligé de vous 
éjecter et d'abandonner votre 
appareil ! 

Gee Bee Air Rally était gran- 
diose sur Atari ; malheureuse- 
ment, la version Amstrad pré- 



sente des graphismes nettement 
plus pauvres ! L'animation, 
quant à elle, est de bonne qua- 
lité mais ce logiciel a quand 
même un léger handicap : il est 
facile... 



Défi au tarot 

Coktel Vision 
Réflexion 



Jous les amateurs de 
jeux de cartes et en 
particulier, de tarot 
vont être ravis car ils 
ont enfin la possibilité de se 
livrer à leur passe-temps favori 
sans être obligé de quémander 
3 partenaires ! 

Le jeu se présente ainsi : les 4 
joueurs sont désignés par les 
points cardinaux ; une fois les 
cartes distribuées, votre jeu 
apparaît à l'écran et lorsque 
votre tour arrive, vous pouvez 
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choisir de passer, de prendre 
une petite ou une garde (avec, 
sans ou contre le chien). Le cas 
du grand chelem n'a pas été 
prévu. Une fois que le chien a 
été récupéré puis reconstitué, la 
partie peut commencer ; s'affi- 
chent alors à l'écran le nombre 
de points que vous devez effec- 
tuer, en fonction des bouts que 



vous possédez, et votre score au 
fur et à mesure du jeu. Enfin, 
il faut noter qu'il est tenu 
compte des annonces spéciales 
telles qu'une poignée, une dou- 
ble poignée ou le fait de mener 
jusqu'au bout le petit. 

Ceux qui ne connaissent pas ce 
jeu n'ont sans doute pas com- 



pris les lignes précédentes mais 
je n'ai pas voulu expliquer ces 
termes car le logiciel part du 
principe que vous connaissez les 
règles. Le graphisme est cor- 
rect ; par contre, vous avez par- 
fois l'impression que les ouver- 
tures sont un peu trop faites en 
fonction de votre jeu... Enfin, 
personne n'est parfait ! 
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Logiciel 44 



Réussir à faire une dic- 
tée sans faute ou pou- 
voir calculer vite et 
sans erreur, voilà deux 
points qui créent bien souvent 
quelques angoisses pour tous les 
élèves. Dans le but de donner 
aux enfants la possibilité de pro- 
gresser grâce à un soutien infor- 
matique, plusieurs éditeurs ont 
sorti des logiciels dits éducatifs, 
avec plus ou moins de succès, il 
faut le reconnaître. Ce mois-ci, 
nous avons décidé de vous par- 



ler de toute une gamme de pro- 
duits proposés par une équipe 
d'enseignants et d'informati- 
ciens qui ont travaillé pendant 
5 ans pour obtenir les logiciels 
que nous allons vous présenter. 
A l'instant où nous écrivons ce 
banc d'essai, 5 logiciels sont dis- 
ponibles sur Amstrad CPC ; ce 
sont respectivement Orthogra- 
phe CE, Orthographe CM, Or- 
thographe 6 e - 5 e , Les 4 opéra- 
tions et Mathématiques CM. A 
ces 5 titres viendront s'ajouter, 



cheveux tous|_ ébouriffés 

chaussures tou abîmées 

vêtements tou _ humides 

mains tou froides 

rideaux tou neufs 

pommes tou rondes 

tables tou blanches 

livres tou déchirés 

eaux tou agitées 

Joues tou roses 



.ut" a-t-il le sens de "tout a fait' 



oui ou non 



tout 



*P& 




d'ici le début 89, 5 nouveaux 
logiciels intitulés comme suit : 
Vocabulaire CM, Conjugaison, 
Mathématiques 3 e , Orthogra- 
phe 4 e - Ire et Anglais 6 e . Une 
des particularités de Logiciel 44 
est de toujours utiliser le même 
programme comme toile de 
fond ; par conséquent, nous al- 
lons vous décrire simplement 
Orthographe CE. 
Tout d'abord, il faut noter un 
des points spécifiques de ce logi- 
ciel : à partir du moment où un 
enfant travaille avec une dis- 
quette, il peut suivre ses progrès 
et travailler tel ou tel exercice en 
fonction des résultats obtenus. 
En effet, il est possible d'enre- 
gistrer 14 noms sur une même 
disquette et d'avoir un suivi 
sous forme de graphiques pour 
chacun d'entre eux, ce qui mon- 
tre de façon précise le taux d'er- 
reur, la vitesse des réponses par 
rapport à la normale, le nom- 
bre de règles acquises et, enfin, 
le nombre de règles assimilées. 
Encourageant, non ? De plus, il 
y a 4 niveaux distincts de com- 
préhension d'un même exercice 
qui peut être incompris, com- 
pris, acquis ou assimilé ; l'élève 
s'efforcera donc d'obtenir la 
mention assimilé pour chacun 
des exercices. 

Un autre des points intéressants 
de ce logiciel réside dans le 
grand nombre de règles propo- 
} sées à l'étude. (A titre d'exem- 
pie, Orthographe CE compte 46 
règles étudiées sur lesquelles 
vont porter environ 2000 ques- 
tions ce qui permet de faire un 
bon travail). Lorsque l'élève a 
choisi la règle qu'il veut étudier , 
il va devoir faire une série de 4 
exercices. Si, durant un exer- 
cice, il fait une erreur, alors des 
questions apparaissent à l'écran 
afin de trouver la bonne ortho- 
graphe. 



Le principe et la méthode de tra- 
vail pour ce logiciel nous parais- 
sent très intéressants dans la 
mesure où l'élève peut effecti- 
vement constater les progrès 
qu'il effectue. D'un autre côté 
il faut noter que la présentation 
du programme est un peu nue 
et triste, de plus, nous tenons à 
signaler un petit détail que nous 
trouvons gênant (surtout pour 
des élèves de CE) : lorsque dans 
un mot 2 emplacements sont 
laissés en blanc et que l'on n'uti- 
lise qu'une seule lettre, le mot 
final est écrit avec un blanc en 
plein milieu ! Par contre, il est 
heureux de constater que ce lo- 
giciel rappelle qu'il faut com- 
mencer une phrase par une ma- 
juscule... Enfin, un dernier avis 
sur la manipulation du logiciel 
et sa réalisation technique : il y 
a eu une recherche effective et 
sérieuse pour que l'élève fasse le 
moins de manipulations possi- 
ble et, de plus, le programme 
détecte lorsque la disquette est 
retirée du lecteur ce qui est ap- 
préciable. 

D'après Logiciel 44, il est néces- 
saire que l'enfant travaille une 
demi-heure par jour pour réus- 
sir à obtenir de réels progrès. 
Afin de le prouver de façon 
concrète, il a été décidé de faire 
une expérience en équipant 6 
élèves volontaires de CM 1 d'un 
CPC à leur domicile. Ils se sont 
engagés à travailler 30 minutes 
quotidiennement les jours de 
classe et 1 h les mercredi, 
samedi de classe et les jours de 
vacances et ce, depuis le 30 mars 
1988. Cette expérience prendra 
fin le 7 septembre 1988, date à 
laquelle nous pourrons consta- 
ter les progrès effectifs des élè- 
ves après plus de 100 heures de 
travail ; CPC ne manquera pas 
de vous faire part de ces résul- 
tats. 
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Disquettes Réussir : 170 F la 
disquette. Pour plus de rensei- 
gnements, contacter : 
Logiciel 44 
5, rue des grands Courtils 
44400 REZE 
Tel : 40.75.75.70. 
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DEBUGGER ut fait pour 



celui qui prograaae an 
langage aachine ou qui 
envisage de s'y lettre. 
DEBUGGER c'est i 
«Un désasseableur . 
sUn éditeur: 256 octets 
directeaent accessibles 
«Un relogeur qui peraet 
de décaler un prograaae 
sans s'occuper ou presque des aod 1 f icat ions à faire 
»Un pas à pas peraettant de visualiser, instruction 
après instruction ,1e dérouleaent de vos prograaaes 
«Ainsi que 19 autres fonctions. 



Vous désirez un 
logiciel de DAO 
qu 1 expie i te la 
totalité du CPC 
6126 " 
CRAPH-SKT c'est 




«Une feu i 1 le de 
tr.ivnl j usqu ' à 
5 écrans direc- 
teaent accessi- 
bles » Un générateur de sprite * Des outils de des- 
sin t oerographe , arc de cercle. ...i * Des fonctions 
graphiques (rotation, incrustation, copie, inversions, 
...) * Une loupe * Le au 1 1 i f enét rage * Une fonction 
"UNDO" * Une sortie sur lapriaante paraaétrable (du 
tiabre poste jusqu'au poster) * ... 
GRAPH-SET est 3iaple d'eaploi ( icônes, sous-aenus ) . 
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* Récupérer un 
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Une documentation ( joindre 3170 en timbre) 

DEBUGGER 6128/664 295 < 

6128 uniquement 375 f 

6128/664 175 f 

6128 uniquement 550 ( 

800 « 

6128 uniquement 2 75 ' 
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DIGI-VOX 




Il existait déjà un boî- 
tier de synthèse vocale 
des logiciels d'échantil- 
lonnage, Digi-Vox est 
quant à lui le premier matériel 
consacré à la noble et juste 
cause du "parler" informati- 
que. Les fans de Stanley 
Kubrick vont être réjouis par la 
forme "monolithique" de l'en- 
semble. Un connecteur se fiche 
sur le port expension de nos 
ordinateurs chéris, ou du moins 
à l'arrière du 664 et du 6128. En 
effet, il n'a pas été prévu sur le 
boîtier Digi-Vox, un deuxième 
connecteur pour le lecteur du 
464. Quel lecteur de disquettes ? 
Si je veux utiliser un lecteur de 
cassettes ? Pas de bol, le logi- 
ciel qui accompagne est sur dis- 
quette. Ah bon. Eh oui, le 464 
est éliminé d'office. 
Le logiciel lui tourne sous CPM 
2.2. Le menu offre quatre op- 
tions : Restitution du son, Sau- 
vegarde du son, Enregistre- 
ment/Lecture, fin. Je ne pense 
pas qu'il soit nécessaire de 
s'étendre sur la dernière option. 



En revanche, Enregistre- 
ment/Lecture nous autorise 
quelques lignes de commen- 
taire : un enregistrement peut- 
être divisé en 4 segments de 4 
secondes chacun. Il est donc 
possible de n'enregistrer que 4, 
8, 12, ou 16 secondes de son. 
C'est par l'intermédiaire d'un 
micro placé sur le haut du boî- 
tier que le CPC peut "enregis- 
trer" le son ambiant. Il est d'ail- 
leurs dommage de ne pas avoir 





prévu une fiche permettant 
connexion avec un appareil ex- 
terne, type radiocassette ou 
chaîne hi-fi, la qualité de resti- 
tution aurait été sûrement meil- 
leure. Car il faut bien le dire, le 
son sortant du petit haut- 
parleur du CPC n'est pas au- 
dessus de tout reproche. C'est 
pourquoi, il est fortement 
recommandé d'utiliser un appa- 
reil extérieur pour sortir vos 
échantillons. Signalons qu'il est 
possible d'augmenter la mémoi- 
re initiale (32 Ko) à 64 Ko ou 
128 Ko (par l'adjonction d'un 
petit circuit supplémentaire). Le 



Digi-Vox possède pour lui l'ori- 
ginalité du produit et la qualité 
de sa conception. Mais il est 
desservi par un logiciel peu per- 
formant (pas de copies, d'over- 
lay des sons) et surtout par son 
prix : 960 F environ dans la ver- 
sion de base. N'oublions pas 
que le boîtier est absolument 
nécessaire à la restitution du 
son. Les échanges de sons digi- 
talisés ne seront pas possibles, 
à moins de posséder le boîtier. 
Ces quelques caractéristiques 
nuisent à l'image de ce produit 
unique en son genre sur l'Ams- 
trad CPC. 
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LE SPECIALISTE 
NANTAIS DU PC 

Revendeur qualifié conseil 

M • S.A.V. personnalisé 

• Contrat de maintenance 

• Logiciels - Livres 

• Location 

■ Adresse : 

9, rue Urvoy de Saint Bedan 

44000 NANTES 

Tél. 40.69.03.58 



GAGNER AU LOTO 

un rêve qui peut devenir 
réalité avec 

LOTO - MATIC 

le programme qui vous révèle 

tout ce que vous devez savoir 

pour : 

• trouver facilement les numéros 

qui ont le plus de chance de sortir 

• établir scientifiquement 

les grilles les plus performantes 

grâce aux tests du Lotoscope 

• contrôler sans peine 

les résultats de vos jeux 

Editions écran et imprimante 

Documentation détaillée 

+ CADEAU contre 4 timbres 

INFORMATIC Applications 

B.P. 78 - 67800 BISCHHEIM 
Tél. 88.33.58.85 




PLUS 

JAMAIS 
CA 



FICHIER 



SIMPL 




.Fichier de 63eee caractères 
.256 caractères aaxi pu- flcbo 
.De 1 à 99 zones pur fiche 
.Manipulation du fichier 4 travers des 
'FORMULAIRES ECRANS' paraaétrabler. 
■Modifient ion -Visualisation-Suppression 
Sur Sélection MONO FICHE .MULTI CRJTKXES, 

Sur l'enseable du FICHIER 
.Fonction de tri du Fichier 

FICHUS SIMPLE 

repond à TOUS vos besoins : Fichier stock 

Fichier clientèle, dociaventalre.etc ... 



CPC 6128 
2«> Fr 



464-DDI.664, 8236 
Four bientôt 



Rens et Doc contre 2 tlabres 
Coenandc* accovpagnee de votre règlement 

M.L.C des Conbrailles BP 0) 

Nonlaigut 6370C St Eloy Les Hines 

(Rens :P,oberto Tel 16. 1. t5.92.B1.25) 
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Matériel utilisé 
Accessoires : 

Comptez-vous changer de matériel ? : 

Si oui, quel matériel à votre préférence ? 

Etes-vous abonné ? 

Sinon pourquoi ? 



Achetez-vous CPC régulièrement ? 

Trouvez-vous facilement votre revue dans les kiosques ?. 

Combien d'autres personnes lisent votre exemplaire ? 

Etes-vous satisfait du contenu ? 

Vos remarques : 



Lisez-vous d'autres revues micro ?. 
Lesquelles : 
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Ce programme vous 
permettra de vérifier l'action 
des commandes directes du 
FDC (Floopy Disc 
Controller). C'est pourquoi il 
est préférable de ne travailler 
que sur des copies et non pas 
sur des disquettes contenant 
des données importantes. 
N.B. : le chargement 
s'effectue en lançant le 
programme BASIC 
(MONIDISC.BAS). Ce 
dernier a besoin d'un 
programme intitulé 
"OBJET.BIN" créé par le 
programme ' 'OBJET. DA T ' 
après un simple RUN. 



Les CPC dialoguent avec le(s) lecteur(s) 
de disquettes 3" grâce à 3 ports : 

- &FA/E = Commande du moteur 

- &FB7E = Registre d'état principal 

- &FB7F = Registre de données. 

Tout le transfert des données entre lec- 
teur et processeur se fait avec le regis- 
tre de données, soit l'octet se trouvant 
à l'adresse de port &FB7F. La synchro- 
nisation est faite avec la lecture du regis- 
tre d'état principal, soit l'octet se trou- 
vant à l'adresse de port &FB7E. 
Le contrôleur de disquette dispose de 1 â 
instructions ; les programmes internes 
des CPC (AMSDOS) n'en utilisent que 
quelques-unes et plusieurs sont accessi- 
bles par le BASIC. Seules les opérations 
de lecture et d'écriture secteur et de for- 
matage ont besoin d'algorithmes en lan- 
gage machine (très simples). 
Les 15 instructions possibles sont au 
menu (sauf : interroger l'état d'interrup- 
tion). 

Chaque phase d'une instruction est dé- 
composée et l'appui sur une touche la fait 
progresser. Lorsqu'il est demandé de 
fournir une donnée, le programme pro- 
pose la donnée standard utilisée dans les 
CPC soit : 

- 2 pour la taille secteur (512 octets) 

- pour adresse de tête (lecteur à 1 seule 
tête) 

- 82 pour GAP 3 de formatage 

- 42 pour GAP 3 de lecture/écriture 
secteur 

- de &41 à &49 pour les numéros de 
secteur. 
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MONITEUR 
DE DISQUETTES 



tPascal ARRIBAT 



Registre d'état principal 

T NO-TR 

TRANSFERT 



INPUT 
OUTPUT 



Indique s'il peut recevoir ou transmettre un octet 
en &FB7F 



Sens des données le contrôleur attend un octet 
le contrôleur envoie un octet 



NO EXECUTE 
EXECUTION 



Indique s'il exécute l'instruction 



NOBUSY I Indique que le contrôleur a commencé une 
BUSY I instruction et qu'il doit la terminer 



D 
C 
B 

A 



Drive utilisé 



Régis tr 


e de donnée 


1er octet : Etat d'interruption 




11 


READY CHANGE Bit 5 du registre d'état lecteur s'est modifiée en cours 
Il d'instruction. 




10 


INSTR-ILLEGALE Cette instruction n'existe pas. 


^L^l 


01 


INTERRUP-INSTR Instruction interrompue *NOTA 




00 


SUCCESSFULL Instruction terminée avec succès. 





EN-COURS 1 Indique que l'instruction est terminée. 




» 


FTN-INSTR 







OK 


Indique une erreur dans le traitement de 




1 


ERROR 1 l'instruction. 





READY 


Indique l'état du contrôleur. 




1 


NO-READY 







HEAD-1 


Tête utilisée pendant l'instruction. 




1 


HEAD-2 




11 


DRIVE D 






10 


DRIVE C 


Drive utilisé pendant l'instruction. 




01 


DRIVE B 






00 


DRIVE A 



♦NOTA : ce message n'indique pas forcément une erreur, il intervient dans l'option 3 si le pre- 
mier secteur est le même que le dernier. 
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Registre de donnée 



2ème octet : Eut 1 








1 


OK 
END-TRACK 


Indique la fin normale de la piste 








Toujours à : inutilisé 




1 


OK 
DATA ERROR 


Erreur dans la valeur de contrôle (Check sum) 




1 


OK 
OVER RUN 


Echange de données trop lent (> 26ms) 








Toujours à : inutilisé. 




1 


OK 
NO DATA 


Identification de secteur non trouvée. 






1 


OK 
W/PROTECT 


Disquette protégée contre l'écriture lors d'une opération 
d'écriture. 




1 


OK 

NO-ID 


Identification de la data adress mark non trouvée. 



Registre de donnée 


3ème octet : Etat 2 










Toujours à : inutilisé. 





OK 


Indique une data adress mark effacée. 




1 


EFFACEE 







OK 


Erreur dans la lecture secteur. 




1 


DATA ER 







OK 


Erreur dans le numéro de piste indiqué et celui 




1 


TRACK ER 


indiqué lors du formatage 





SCANER 


Indique si une opération scan a donné un résultat 




1 


OK 


positif : sinon toujours à 0. 





OK 


Indique lors d'une instruction scan qu'il n'a pas 




1 


NO-SECTOR 


trouvé le secteur indiqué. 





OK 


Indique qu'il n'a pas trouvé la piste indiquée. 




1 


TRACK ER 







OK 


Identification de la data adress mark non trouvée 




1 


NO-ID 


lors de l'écriture secteur. 



Registre de donnée 



Registre d'état lecteur (drive status) 



lo 


OK 


Indique une erreur dans le lecteur de disquette. 


1 1 


FAULT 




1 ° 


W/R 


Indique si la disquette est protégée ou non. 


1 1 


W-PROTECT 




1 ° 


NO-READY 


Indique l'état du lecteur de disquette : disquette 


1 1 


READY 


présente et en rotaùon. 


1 ° 


TRACK ? 


Indique s'il se trouve réellement sur la piste 


1 1 


TRACK 




1 ° 


DOUBLE 


Indique si le lecteur a 2 têtes. 


1 1 


SIMPLE 




1° 


HEAD-1 


Indique la tête sélectionnée. 


1 1 


HEAD-2 




f n 


D 




1 10 


C 


Indique le lecteur sélectionné. 


1 01 


B 




1 00 


A 





Il surfit d'appuyer sur RETURN pour 
valider la donnée proposée. 
Les données à fournir sont en décimal 
sauf pour les données des numéros sec- 
teurs dans le formatage d'une piste qui 
doivent être en HEXADECIMAL. 
Les numéros de piste sont de à 41 car 
il est possible d'aller jusqu'à 42 pistes sur 
les lecteurs CPC (chercher une piste 43 
ou plus risque d'endommager le lecteur) . 
Le formatage se fait par pistes indépen- 
dantes avec des tailles de secteur : 

- pour 128 octets 

- 1 pour 256 octets 

- 2 pour 512 octets = standard CPC 

- 3 pour 1024 octets 

- 4 pour 2048 octets 

- 5 pour 4096 octets (maximum sur dis- 
quette 3" double densité). 

Chaque instruction commencée doit être 
poursuivie jusqu'à la fin car le contrôleur 
de disquette oblige à lire tous les octets 
de la phase résultat. Si une erreur s'est 
faite dans le choix du menu ou d'une 
donnée demandée, retirer la disquette et 
appuyer sur RETURN jusqu'au retour du 
menu. 

L'option 16 est à éviter ou, au moins, on 
ne doit pas modifier les valeurs données 
par défaut car les CPC ne pourront plus 
accéder à la disquette par leurs propres 
programmes (AMSDOS). (Ceux-ci sont 
les temps de réaction de la tête de lec- 
ture/écriture en ms). 
Une zone mémoire située entre &7000 
et &9FFF permet de recevoir les données 
de secteurs. Il est possible d'écrire dans 
cette zone puis de les envoyer sur la dis- 
quette. Le formatage se sert aussi de 
cette zone pour prendre les numéros de 
secteur. 



SERVEUR 
MINITEL 

N'oubliez pas 
36.15 code MHZ 




Lo BAL. permet un dialogue direct avec 
la rédaction. 

Lei petites annonces ouvrent la porte aux 
bonnes affaires I 
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N? 



LIGNE BASIC 



150 Iniiialitotion de» variable. 
170 Menu 

270 Arr*t moletir 

300 Marche moteur 

330 Lire de. donne»» 

350 Ecrire de* donnée* 

370 Lire données effacée» 

390 Ecrire donnée» effocéet 

410 Lecture d'une pitfe 

430 Formater une pitle 

620 lire ID 

650 Scan equol 

670 Scan low or «quai 

690 Scan high or equal 

710 Chercher pirte 

760 Chercher pitte No 

840 Lire étal lecteur 

900 Indiquer donnée» lecteur 

1040 Lire butfer 

1110 Réinitialiser 



SOUS-PROGRAMME 



+ 1 U0 Deuine cadre ETAT PRINCIPAL 
et ETAT LECTEUR tt 2 instructions 
+ 1150 Dessine codr. ETAT PRINCIPAL 
«i ETAT LECTEUR .1 1 instruction 

• 1 260 0>>tine codr» ETAT INTERRUP- 
TION 

+ 1330 Dessine ETAT ST I «t ST2 et nom 
initrvction et envoi» 2 instructions 
-f 1 430 Affiche nom initrudion et envoie 
2 instructions 

+ 1450 Envoie 2 instructions 
U90 lii et offioSe ETAT PRINCIPAL ou 
STI ou $12 

• 1540 Lit et affiche ETAT LECTEUR 
+ 1550 Affiche ETAT LECTEUR 
-1610 Lit et affiche ETAT INTERRUP- 
TION 

-1620 Affiche ETAT INTERRUPTION 
+ 1690 Lit et affiche 7 résultats et FIN 
+ 1810 Affiche FIN 

• 1840 Demande le» 7 instruction) 
•2010 Teit lei valeurs en entrées 
-2070 DATA 



VARIABLES 



m$(18) - Tableau des options du menu 

pS(48) - Tableau de correspondance des bits du registre PRINCIPAL et STI et ST2 
p(48) • Tableau des positions sur la ligne du registre PRINCIPAL et STI et ST2 
i$(1o) - Tableau de correspondance aes bits du registre d'INTERRUPTION 
i(16) • Tableau des positions sur la ligne du registre d'INTERRUPTION 
s$(16) - Tableau de correspondance des bits du registre d'ETAT LECTEUR 
s(16) - Tableau des positions sur la ligne du registre d'ETAT LECTEUR 
h(27j - Tableau des numéros secteurs standard (format système). 

x, xx t y, z - Variable de boucle 

xS, yS, zS • Variable de read et inpul 



d . 
c = 
t = 
I = 
zz 
oS 



■ adresse du registre d'état principal ou de donnée &FB7F - &FB7E 
décalage pour registre d'état principal ou stl ou st2 dons tableau pS - 
appuyer sur une touche pour continuer 0-1 

ligne pour registre d'état principal ou stl ou st2 4 - 10 - 13 
» affichage en hexa ou décimal - 1 
-- inpul du menu 1 à 18 
e numéro du menu appelé 1 à 18 

• mémoire du butter pour données des secteurs &70O0 à &9FFF 
instruction à exécuter à 255 

> taille secteur (formatage et secteur) - 1 -2-3-4-5 

■ secteur par piste (formatage) 1 à 27 
nb octets GAP 3 (formatage) à 255 

■ octet de remplissage (formatage) à 255 
numéro de piste (formatage et secteur) à 41 

i adresse de tête (secteur) - 1 
i adresse secteur (secteur) à 255 

■ dernier secteur (secteur) à 255 

■ nb octets GAP 3 (secteur) à 255 

= long secteur (secteur) 0-1-2-3-4-5 
= stop raie (lecteur) 2 a 32 slep 2 
= off head (lecteur) à 480 step 32 

■ on head (lecteur) 4 à 512 step 4 

* mode dma (lecteur) - 1 

= nb secteur lecture buffer 0-27 



16-32 



ATTENTION A VOS DISQUETTES ET AUX VALEURS ENTREES VOUS N'ETES 
PLUS PROTEGES PAR LES PROGRAMMES DE l'AMSDOS POUR LES EVENTUEL- 
LES ERREURS. 




COPYRIGHT 1963 nlCRC-APPLICATION 


DAMS. 








ORC 


e.wsa 




OI 






L0 


de. naos» 




LD 


h !.»£<<< 




LD 


bc.»*b7< 




CALL 


ecr i t 




CALL 


read 




El 






RET 






DI 






LD 


hl.»S<ff 




LD 


bC.»«b7« 




CALL 


écrit 




CALL 


wr t te 




El 






RET 




read 


DEC 


c 


1 OOPl 


IN 


..■Ci 




JP 


P. ioopI 




AND 


ma 




RET 


z 




INC 


c 




IN 


a. (c) 




LD 


(hi).a 




INC 


ht 




LD 


a. h 




CP 


d 




RET 


z 




JR 


read 


Nrtte 


DEC 


c 


1oop2 


IN 


..ICI 




JP 


p. ioop2 




AND 


•20 




RET 


z 




INC 


c 




LD 


a. (hl > 




OUT 


ici.. 




INC 


hl 




JR 


write 


•crix 


LD 


a. (hl> 




OUT 


ic).a 



t ROUTINE 0€ LKCTUHE 



lécrit dernier» i nmtruct io*. 
spmi» éxecution de iect-jr*> 



.routine ivecritu**: 



:»cr.t dernière instruction 
ipsai* exécution d'écritu** 



Mit det* *ur di*au*tt# 



i r in de l ' exécution 



ïorotee* i* mémoire pu*.. 



.écrit data *ur le disau* 



1 f i h de l' exécution 



INC 


hl 


LD 


a. «es 


ait DEC 


a 


NOP 




JR 


nz. att 


RET 




T»«ti«68FS 


End!«6Eil4 


H«+a : H8DÏ9 





■ ;if Bvt.» 



W ° N 
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ONIDISC.BAS 



10 ******************************************** >LA 

20 * * >LB 

30 '• P.ARRIBAT MONIDISC NOVEMBRE 1987 ♦ :>LC 

40 •* * >LD 

50 't«t******#tHHf##**»*M#t**«*«t«tt*»#«*tHr«**** >L£ 

60 MEMORY &6FFE:LlWobjet.bin\ciA000 >JT 

70 MODE 2: PAPER 0:PEN 1:INK 0,0: INK 1.26: BORDER >00 

80 DIM a$(18),P$(48),p(48).i$(16).i(16),s$(16),s(16),h( >ZP 
27) 

.90 FOR x=l TO 18:READ x*:n$(x)=x*:NEXT:FÛR x=l TO 48:RE >ZW 
AD x$:p$(x)=x$:NEXT 
100 FOR x=l TO 48:READ y:p(x)=y:NEXT:FOR x=l TO 16:READ >XD 

x$:i$(x)=x$:NEXT 
110 FOR x=l TO 16:READ y:iix)=y:NEXT:FOR x=l TO 16:flEAD >XC 

x$:5*(x)=x*:NEXT 

120 FOR x=l TO 16:READ y:s(x)=y:NEXT >EQ 

130 FOR x=l TO 13:h(x*2-l)=x+64:h(x*2)=x+69:NEXT >RJ 
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140 NJKXM1.9.21.1,IiFEMl.diraPBttl.l:NIN0GW2.22.4i . BH 
S. 25 

: . =0: i=4: t=i. :b= j: e=9: f =62: a=i£5: j=. >: - 
2:o=16:p=<j 

160 r=:':s=o5:u=5:v=')2:w=t3:z:=iJ ftl 

»TE SMiPRUOBUTHIl oe DISQUETTE' ,*F 

ISO FOR x=l TO 16 5TEF 2 XF 

190 LOCATE 3.x+4:PRINT l)SIN&"M": ;;:fF;IM" - 'itf(x) ÏF 

300 lOCATE 47.«t4iPRWI UBINB"H" s n+is sPRIMT 1 - ':■*'*- KM 

. iien 

UO LOCATE l.25[PRIWREï POUR COMMANDE :' FS 

220 OSi2jIIWT#2,",i*l**VflLU«) B> 

230 IF L£N(i*l l OR LOtdt»? * al * a, 19 ÎHEN 260 «1 
:. THENON a GOTO 270.3 ! .390.410, FC 

,620. 

250 ON a-10 GOTO 670,690,710.760,840,900.1040.1110 tPF 

260 lOCATE 60,:5:FRINT''CûMtWNDE INVALIDE ":GOTû 221 « 

27, r E - A-ret du «teur "C 

2B0 M [,0:FOR k»0 TO SO:NEKT:0UTiVA7E>.0tS0UND 1.300 tifl 

.5 

290 I» 1.26:6010 220 >H6 

- 300 ft£M Moteur en aarene TT 

110 IW l.Oifll rt iC SOitCXTiQUrdfflTEI.liSOUO 1.300 >BT 

.5 

-NA 

"0 REM Lire aes damées r i 

340 CLS:i=70:60SUB 1330:GOSUB lB40:CAa IMGO: GOSUb lù9 10 

0:G0TO 170 
■ 350 REM Ecrire des données <VC 

360 CLS:i=ô9:60SUB 133O-.60SUB LBtOlCALL (.frIlI:603U& 169 .LE 

0:5OT0 1 7 

370 REM Lire oonnees eJtacees >r1 

380 CLS:i=76:G03UB lîîOiGÛSUB 1840:CALL hMÛOifiD&B lt.9 HA 

0-.6DTQ 170 

-E M Ecrire données eftacees AH 

400 lL5:i=73:GOSUB 1330:i3OSUB 1840:CALL M0H:G0SUB 169 Nil 

ûiSQTO 170 

410 REM Lecture d'une ciste >HC 

420 aS:i=66:SOSUB 1330:GOSUB 1B40:CAlL WWOiBÛSUE Iù9 >U 

0:60T0 170 

430 REM Fornater une oiste Ht 

«40 CLSîi-77i80SB !330:6Qâl& I490tt*l >E* 

450 LOCATE 17. 18:PRINT"TaiUe secteur (0-5) *;U6IHB >1t 

■Mil ":b 

4o0 ll=lB:cc=47:xx=5:;;=Û:v=b:GÛSU6 :010:û=v:ÙLT d.biBQS <f& 

l£ 1490 

470 LOCATE 17. 1 9: FfiINT" Secteur / Piste (1-271 ,I :USIN6" RB 

[«1: Ni 

480 li=19:itx=:7:x=l:v=e:60SUB 2010:e=v:OUT d.e:G05LB 14 Dfl 

M 

490 LOCATE 17.2Û:PR INT"Nb octets 8AF 3 (0-253) *lUSINB*I tifi 

Ml]; ":( 

500 ll=20;xx=255:x=0:v=t:60SU8 2010:f=v:DUT d.f:GGSU6 1 >EE 

490 

510 LKATE 17.21:P&INT"Gctet toraataoe tû-255)":tJSIN6 , '[ Ub 

•Ml: B ig 

520 n=21:x=0iv=g:60SUB 2010iq«yiPGK &6FFF.q:G0SUB 149 CU 

CPCn : 3!-Juinl9SB 



530 i47000:zi itOCAl iPRUO ta ï?c:eur= :lQC M 

ATI :,:: 

540 PRINT" (0-235) *:FOR i»0 Tû B-i[cc*B+lKT(£/3)«8ilM2 H 

tz-WTu 3>«3 

| 550 LOCATE cc.UiPRWH ihïXiCMi+1 .2 l'il'icc- . 
»0ty*(z+l):B09JB 2010 

«yîPŒŒ ■♦I.OîPOKE ■f2,h<z*l)iPQŒ »»3,Iiipw* ûr 
4îNEXT;h=0 

- 54,25iWINT Ne oe Piste 10-41 'lUSM » ; U 
■-.y. 

580 n=25:cc=77i*x=41:^0:v=i:50SU& 201 !j . -FR 

590 FOR H) TO t-liPK W00O+4* . j &i 

;.■ d w ne pas :■" .>...;■ :E 

610 «KTiCflil. MU2ft=OîG0aB 1=90: 6GT0 170 LU 

62-J REM Lire ID ,26 

:i -74:6061b 1330 XtB 

M £Utl:ffilHTIl, EÏEEUTIOl'iRi ■ TO 90v:*lT:6œu M 

6 le^iSOTO 170 

650 ftEM Scan e^ual NG 

6ùù CLSii=ai:SOSU& L33 -.-._ UO12iG06U 149 >L& 

: .-. . . 

670 REM Scan le* or eaual 

68m CLS:i=89:605U6 1 330 1 «EUS 1840;CALL W012:SOSU6 lû9 >LM 

OiSOTO 170 

690 RE« Scan nnh cr wuaj JA 

700 aSî!=93:BOSUB 1330:&9SUB 1840:CALL tf.012:SQSUB 169 >LZ 

0:60TO 170 

710 fiBI Chtrdw ciste D Tl 

720 CLS;i=7:505U6 1430: CLSftl iPRINTU . ' EXEOm» W 

730 FOR x=C TO 500:NEXT:CLS«1:F*INT#1." RESULThT ■■ : QûSU JH 

B 1610 

740 j=INPld):LOCATE 60.18:PftINT"No de oiste : ":USIN5*< /MC 

750 PRIN7' «-:tCyiu.2)t605UB IBlOsflDl LA 

760 REM Chercher piste Ha JR 

770 CLS:i=15:G0SU6 14:0:50506 1490 CL 

780 LOCATE 17.l8:Pfi!NT"tio de Piste 10-411 'llSWEHll Jï 
'a 

1*790 U»lB!CC«42:xiHl!K-0iy"ji60BUB ZOlOlj-ysOUT d, > )U 

800 CLSIliPRINTil." EXECUTION":FOR ::=0 TD 700:fOT ^ 

B10 CLSIhPfiINTIl." RÊSULTAT'ifiOSUB 1610 El 

620 j=INPld>: LOCATE e0.1B:PfiINT'No de piste : ':U5!N6"# 'MB 
W;j; 

830 PRINT" #";HE<$(i.2):GOSUB 1810:6OTû 170 101 

840 REM Lire état lecteur m 

850 CLSilOCATE 41,1:FRINT UFf£Rii»*ia)):G0SU6 1140 m 

860 G05UB 1490:CLS«1:PRINT»1," INSTRUCTION" XF 

870 LOCATE 13,18:PfiINT"IO4-:0UT d.4:60SUB 1490 FT 

880 LOCATE 13,19:PRINT'I00":0UT d,0:CL5*l:PRINTIl." RE MOI 
SULTAT" 

890 GOSUB 1490:G0SUB 1550:G0SUB 1810:&0TQ 170 /MX 

900 REM Indiauer oonnees lecteur >CX 

910 CLSilOCATE 41,l:PftINT UPPERUrtlailiGOSUB 1150 Mffl 

920 60SUB 154O:B0SUB 1490:CLSII:PRINT«." INSTRUCTION" ^BL 

■930 LXATE 13.18:PRINT"I03 U :0UT d,3:E30SU8 1490 >PH 

♦940 LOCATE 17,18:PRINT"Step rate (2-321 MBING'tll]: ,K» 




"ik 

950 11=18: cc=41 : xx=32: x=2: y=k: 60SUB 2010:k=v >PP 

960 LOCATE 17,19: PRINT"OH head (0-480) ";USIN6"[*##]: >6T 

";n 

970 ll=19:xx=480:x=0:y=n:S0SUB 2010:n=y >JT 

980 OUT d,VAL("*.x"+BlN»(INT((32-k)/2),4)+ u 0000"i*INT(n/ >DE 
32):t=l:G0SUB 1490: t=0 
990 LOCATE 17. 20:PRINT0n head (4-512) ":USIN6" [#!#]: >FE 

■;o 

-1000 ll=20:xx=512:x=0:y=o:G0SUB 201ù:o=y >KA 

1010 LOCATE 17,21:PRlNT"Mode DMA (0-1) ":USIN6"[#]: >FZ 

";p 

1020 ll=21:xx=l:x=0:y=p:GOSU6 2O10:p=y >HC 

1030 OUT d,INT(o/4)-l+p*128:G0SUB 1810:G0T0 170 >PY 
1040 REM ? >GK 

1050 CLS:L0CATE 31.1:PRINPBUFFER DE S.7000 a &9FFF (12 >RT 
Ko)":y=i<7û00 

1060 INPUT'Nb de secteur (1-24) : \q:INPUT"Taille sec >66 
teur ( 0-5 ) :",b 

1070 FOR x=l TO q:PRINT"Secteur No : ";x;" ":HEX*( >JH 
y);"-"iHEX$(y+128»2- s b-l) 

1080 FOR y=i7000+(x-l)*128»2't TO &7000+x*128*2 A b-l >RD 
1090 PRINT HEX$(PEEK(y),2);" ";:NEXT:PRINT:NEXT >VY 
1100 CALL &BB18:60T0 170 >RU 

1110 REM réinitialise >RR 

1120 FOR x=i7000 TO fc7000+«c2FFF:POKE x,0:NEXT:60T0 150 >XT 
1130 REM s/p cadre ETAT PRINCIPAL et DRIVE STATUS >UD 
1140 LOCATE 1,19: PRINT" Inst No 2:° >EP 

1150 LOCATE l,18:PRINT"Inst No 1:":L0CATE l.l:PRINT"Pha >LK 
se :" 

1160 CLS#l:PRINTil." PREPARATION" ;CU 

1170 PLOT 0,374:DRAW 639.374:DRAW 639,330:DRAW 0.330:DR >6U 
AW 0,374 

1180 PLOT 60,330:DRAW 60,374:L0CATE 3.3:PRINT"Etat":L0C >FT 
ATE 2,4:PRINT"Pnnc ! ' 

1190 PLOT 156.330:DRAH 156,374:PL0T 244.330:DRAW 244,37 >PZ 
4: PLOT 348.330 

1200 DRAW 348,374:PL0T 444,330:DRAW 444.374:PL0T 0,182: >MX 
DRAW 639,182 

1210 DRAW 639,136:DRAW 0.136:DRAW 0,182:PL0T 60,136:DRA >GF 
H 60,182 

1220 PLOT 0,182:DRAW 639.182:DRAW 639.136:DRAW 0.136:DR ;GN 
AW 0,182 
1230 LOCATE 2,15:PRINT"Dnve":L0CATE 2,16:PRINT"Status" >GM 

1240 PLOT 124,136:DRAW 124.182:PL0T 220,136:DRAW 220,18 >PY 

2:PL0T 308,136 

1250 DRAW 308,182:PLOT 3B8, 136: DRAW 388. 182: PLOT 460,13 ;PW 

6: DRAW 460,182 

1260 PLOT 532, 136: DRAW 532, 182:RETURN >EW 

1270 REM s/p cadre ETAT INTERRUPTION >FP 

1280 PLOT 0,326:DRAW 639,326:DRAW 639,282:DRAW 0,282:DR >GZ 

AW 0,326 

1290 PLOT 60,282:DRAW 60,326:L0CATE 3,6:PRINT"Etat":LX >FL 

ATE 2,7:PRINT"Inter" 

1300 PLOT 180,282:DRAW 1B0,326:PL0T 292,282:DRAW 292,32 >PC 

6:PL0T 364,282 

SS 



1310 DRAW 364.326:PL0T 460,2B2:DRAW 460,326:PL0T 532,28 )BZ 

2: DRAW 532.326:RETURN 

1320 REM s/p cadre ETAT ST1 et ST2 >AN 

1330 PLOT 0,278:DRAW 639,27S:DRAW 639.234:DRAW 0,234:DR >GH 

AW 0,278 

1340 PLOT 60,234:DRAW 60,278:L0CATE 3,9:PRINT"Req' :LOCA ;AX 

TE 3,10:PRINT"ST1" 

1350 PLOT 156,234:DRAW 156.278:PL0T 18e,234:DRAW 186.27 -QT 

8: PLOT 292,234 

1360 DRAW 292,278:PL0T 380,234:DRAW 380.278:PL0T 412.23 >PU 

4: DRAW 412,278 

1370 PLOT 484, 234: DRAW 484, 278: PLOT 580. 234: DRAW 580.27 >ZH 

8 

1380 PLOT 0,230: DRAW 639. 230: DRAW 639. 186: DRAW 0.186: DR >GN 

AW 0,230 

1390 PLOT 60,186:DRAW o0,230:L0CATE 3,12:PRINT n Reg":L0C >BR 

ATE 3,13:PRINT"ST2" 

1400 PLOT 92,186:DRAW 92.230:PL0T 156.186:DRAW 156,230: >MX 

PLOT 236, 186 

1410 DRAW 236,230:PL0T 324.186:DRAW 324.23O:PL0T 404.18 ;PJ 

6: DRAW 404.230 

1420 PLOT 500,186:DRAW 500,230:PLOT 580.186:DRAW 580,23 >YA 



1430 LOCATE 41,1:PRINT UPPER$(«$(a)):60SUB 1140:G0SUB 1 >DX 

280 

1440 GOSUB 1540:G0SUB 1490 >UC 

1450 CLS*1:PRINT#1," INSTRUCTION" >DU 

1460 LOCATE ll,18:PRINT"#";HEX*(i,2):0UT d,i:GOSUB 1490 >ZY 

1470 LOCATE ll,19:PRINT"IO0":0UT d,0:RETURN >MA 

1480 REM LIT et AFFICHE ETAT PRINCIPAL et ST1 et ST2 >VD 

1490 PEN 0: PAPER l:e»=BIN$(INP(d-l),8) >FG 

1500 FOR x=0 TO 7:f»=MID*(e$.x+l,l) >BP 

1510 LXATE p(2*x+l+VAL(f$)+c),l:PRINT p*(2»x+l+VAL(«) >DF 
+c) 

1520 NEXT:PAPER 0:PEN 1: IF t=0 THEN CALL &BB18:RETURN E >M0 
LSE RETURN 

1530 REM LIT et AFFICHE DRIVE STATUS >EJ 

1540 OUT d,4:0UT d,0 >NP 

1550 PEN 0:PAPER l:e*=BIN$(INP(d),8) >DM 

1560 FOR x=0 TO 5:f$=MID$(e$,x+l,l) >BU 

1570 LXATE s(2*x+l+VAL(f*)),16:PRINT s$(2*x+l*VAL(f$)) >GY 
:NEXT 

1580 LOCATE 70, 16:PRINT s*(13+VAL(MID$(e$,7, 2))) >QB 

1590 PAPER 0:PEN 1: RETURN >UD 

1600 REM LIT et AFFICHE ETAT INTERRUPTION >LZ 

1610 OUT d, 8: GOSUB 1490 >RH 

1620 PEN 0:PAPER l:e*=BINS(INP(d),8) >DK 

1630 LOCATE 9,7:PRINT i$(l+VAL("fcx"+MID*(e*,l,2))) >TG 

1640 FOR x=2 TO 5:f$=MID$(e*,x+l,l) >BV 

1650 LOCATE i(2*x+l+VAL(f$)),7:PRINT i$(2»x+l+VAL(^M: >EB 
NEXT 

1660 LOCATE 70,7:PRINT i$(13+VAL("fcx"+MID*<e$,7,2)>) >VQ 

1670 PEN 1:PAPER 0:GOSUB 1490:RETURN >EQ 

1680 REM LIT et AFFICHE 7 RESULTATS >DL 

1690 CLS#1:PRINTI1," RESULTAT ":60SUB 1490: 60SUB 1620 >YZ 
1700 d=d+l:l=10:c=16:t=l:G0SUB 1490:d=d-l:l=4:c=0:t=0:G' >LQ 

CPCn° 35 -Juin 1988 
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4 REVUES POUR LES PASSIONNES 

CPC - REVUE DES UTILISATEURS D'AMSTRAD : en vous abonnant, vous recevrez chez vous 
votre revue. Vous bénéficierez de réductions sur certains produits et vous recevrez gratuitement un 
numôroHORS SERIE tous les deux mois. 

AMSTAR : en avant-première, toutes les nouveautés sur AMSTRAD - des programmes, des ar- 
ticles ! A la demande de nos lecteurs, nous prenons désormais les abonnements. 

PCompatlbles Magazine : la référence en matière d'initiation et de perfectionnement sur les "com- 
patibles PC". 

ARCADES : à peine sortis, des dizaines de jeux passés au peigne fin. Des interviews d'auteurs, 
des rencontres avec les éditeurs : le mensuel des fans de jeux sur toutes machines. 



□ CPC AMSTRAD 
□ CPC AMSTRAD 
□ AMSTAR 

□ PCompatibles Magazine 
□ Arcades 

NOM 



11 numéros 220 F 

6 numéros 120 F 

11 numéros 140 F 

11 numéros_210 F 
11 numéros_200 F 

Prénom - 



Attention, tous nos abonnés 

reçoivent avant parution des 

souscriptions sur les 

nouveaux livres ! 



Adresse 



Code postal - 
Date 



Ville 



Signature 



Je m'abonne à 



Merci d'écrire «n MAJUSCULES. Cl-joint un chèque ! belle à tordre de : 
Edition» SORACQM - Service «bonnrnenl - BP 1 1 - 351 170 BRUZ - Retournez M») bulletin]») ou un» photocopie. 
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DITES-M 
TOUT » 



Vous avez des 
remarques, des 
suggestions ou des 
critiques à formuler 
concernant le con- 
tenu du présent 
numéro... 
I Vous souhaitez 
voir traiter un sujet 
^ particulier dans un 
prochain numéro 
'de la revue... 

L'équipe rédactionnelle de CPC est 

à votre écoute 24 heures sur 24, 

grâce à son serveur télématique. 

Composez le 3615, code d'accès 

MHZ, choix Messagerie, boîte CPC 

REDAC. 



NEWSTRflO 



SON ET VOIX DIGITALISÉS 




Newstrad, c'est un magazine magnétique (c'est à dire un 
magazine réalisé entièrement sur disquette ou cassette) 
Mensuel, il se divise en deux parties distinctes ! La 
partie INFOS, vous informe sur toutes les dernières 
nouveautés dédiées a votre AMSTRAD CPC. Au programme : 
Edito, Infos, Tests softs, Initiation au BASIC et au 
LANGAGE MACHINE, Trucs et astuces, Aventuriers perdus, 
Petites Annonces, Courriers, Concours, Etc.. La parties 
SOFTS vous propote chaque mois des logiciels de haute 
qualité, Rapides et originaux !!! Jeux, Utilitaires et 
Educatifs. Newstrad c'est aussi l'innovation ! En effet, 
depuis le numéro 5 Newstrad est accompagné de SON et de 
VOIX DIGITALISES ! De plus vous pourrez, comme tous les 
abonnés de Newstrad, profitez du service exceptionnel de 
SOFT-CCCASE !Ainsi vous pourrez vendre vos logiciels ou 
en acheter à 50 pour cent de leur valeur ! Ex : FERS ET 
FLAMMES est vendu a 130 FRS au lieu de 275 FRS ! ! ! 
6 NUMEROS SORTIS ! POUR 3 MOIS : K7.105 F. DISK : 165 F 
6 MOIS. K7: 210. DISK: 329. 1 AN: K7: 399. DISK : 630 F 



Je m'abonne A NEWSTRAD à partir du Nun. .. Pour .. Mois 
NOM ADR 

DISK. () K7. MICRO-PASSION, 33 BIS RUE CARNOT, 77400 
TH0RIGNY. TEL 64.30.82.78. Minitel 36.15 : SERUMICR0PA 



MICROLOGIC 

1BANCAMSTRAD 6128 I 



Un logiciel vous 
permettant de gérer 
jusqu'à 10 comptes. 
Commandes par 
barres de menus. 
Protection des 
comptes par codes 
secrets. Plus de 
14SOO opérations 
stockables par 
compte. Sorties sur 
écran, imprimante ou 
disquette. Sorties 
multlcritères : Relevé 
complet - Solde réel 



^f^ffi^J tnujSAnoH 



ornons 



■ li II. J 



OOllibB HOHtoct 



ISZ^T OUnWTUM HWMt-Pli-* COOf tfW[~ 



OVTtWnjHt 31 COMPT1 



NOM OI U UMOjUf 


lAMQm TIIT 


MUHCHO OC COMPTI 


BM 


COOI O-AOCf S 


OU 



u h d .mwouimT Mo mit ctBcit^t (: tin.n. 



Cl-' || 



■ UCT. 



'-Ecr-on «ooi»çn mjrn mw 



AJOUTE» HCTTIWI WMTTH THKH 



ima rorounoN 



OATt : oun/n 

Wï : REH. OXO 

orortc/ourr : ym*ï mi ht 

MONTANT : lUI.Mhvwj. 



Solde opérations p ointées (permet de traiter les 
opérations différées du type 
CB.)- Recherche entre 
dates /entre montants minis 
et maxls / avec ou sans 
libellé particulier - Liste 
des chèques émis entre 
dates / entre numéros... 
Bilan - Copie d'écran à 
tout moment - Utilitaires 
d'écrans. d'Imprimante... 



Il MU 'AHQUITUT ^ mil ihctiiiihi:im.ii 



iiimi 



T*SUUtllfc-»OK .1 
AMSTRAD CPC 81 28 



HORYTHMES 

Déterminez grâce à ce logiciel vos 
biorythmes passés, présents et futurs. 
Interprétation commentée des résultats. 
Sorties graphiques et textes sur écran ou 
Imprimante. Calendriers mensuels et 
annuels Intégrés avec possibilité 
d'impression. Recherche de jours... 




B.P. 18-91211 DR AVEIL CEDEX 

DESSIN JECHNiQU 

Cette série de logiciels vous permet de 

réaliser vos schémas. Implantations et circuits 

électroniques en quelques minutes. Livrés 

avec une bibliothèque Importante de 

composants, symboles et graphiques vous 

obtenez des documents directement 

exploitables pour réaliser vos circuits 

Imprimés. Plusieurs utilitaires sont fournis : 

Réductions d'écrans échelle 2 > 

échelle 1, 

Programme de saisis de zones d'écrans et 
manipulations de celles-ci (inversions 
horizontales, verticales, vidéo - cJépbcement 
- sauvegarde..) vous permettant de faire de 
la micro -édition. La version TURBO permet 
de travailler sur 4 écrans en carré ou en 
hauteur avec scrolllng Intégral et de réaliser 
des cartes de très grandes tailles. SIMPLE 
OU DOUBLE FACES-IMPRESSIONS 
MULTIPASSES RESPECTANT L'ECHELLE- 
CLAVIER OU SOURIS - PAS 
AUTOMATIQUE OU MANUEL- 

"VSSôrt IUHUO-. 715 F. 4 





Version On bm: 379 F. 

AMSTRAD CPC 404/684/8128 i 



• AMSTRAD CPC8128 
'OU 484/864 +• Extension DtC 



BON DE COMMANDE 

JE VOUS COMMANDE LES LOGICIELS SUIVANTS- 
TITRE PRIX 



WH I k EMB ALLAGE 
TOTAL COMMANDE 



20,00 



HhULEMENI JOINT A LA) 
COMMANDE OU CONTRE 
REMBOURSEMENT (+30 Frs) 
CHEQUES BANCAIRES OU 
POSTAUX - MANDATS ETABLIS 
A L'ORDRE DE MICROLOGIC 
Renseignements: 
(1) 68.2 1.81 .6b 



PETITES 
ANNONCES 



La place réservée aux petites annonces est 
limitée. En conséquence, celles-ci passent 
dans leur ordre d'arrivée. Par contre, les peti- 
tes annonces farfelues sont systématique- 
ment rejetées... De même, comme il est peu 
probable qu'il existe des "généreux dona- 
teurs" de matériels ou de logiciels, les peti- 
tes annonces faisant appel a ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

Seront refusées toutes les annonces visant 
i vendre ou échanger des listes ou copies de 
logiciels non garantis "d'origine", ainsi que 
toute annonce incitant au piratage. 
En conséquence, réfléchissez bien avant 
d'envoyer vos textes. 
Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étent rédigé è raison d'un 
caractère par case. 

Enfin, toute annonce non accompagnée de 
timbres ne sere pas insérée. 

Vends CPC 664 mono + DMP 1, 3200 F - Vends 
Graphiscop II, 700 F + MP2, 350 F ou «change 
contre DTL 2000. - Ech. jeux. Tél. 64.52.16.94. 

• 

Vends lot de 9 cassettes Amstrad, jeux d'arcade 
et éducatifs, le lot des 9 cassettes (originaux) 
400 F. Tél. 60.15.18.59. 

• 

Vends Mirage Imager + cable 6128 : 400 F + 
dise, originaux (They solda million I - Il - III...) 120 F 
pièce ou 4 pour 450 F. Tél. 87.67.40.47. 

• 

Réalise tous travaux sur imprimante (CPC : 30 F 
digitalise votre vedette préférée: 50F. Tél. 
74.05.62.29. Demander Frédéric. 

• 

Vends T07/70 CL. Mécanique, lec. K7 ext. musi- 
que et jeux, livres, documents, K7 util et jeux. Le 
tout 1550 F. Tél. 77.63.10.59. 

1) 

Vends CPC 6128 + RS 232 + 2 jeux + 6 disk. 
sous garantie 1 mois : 3000 F. P. Laroche 17 av. 
de Toulon 13010 Marseille tél. 91.80.33.59. 

• 

Vends 464 mono 11 ani • jovst • 8 jeux origi 



naux + 2 utilit. + 15 progr. BASIC, le tout 2000 F. 
Tél. 39.69.27.11 (Paris et banlieue). 

: • 

Vends pour Amstrad 3 K7 jeux : Ace of Aces - 
Tracer - Xcel : 100 F chacun ou 250 F les 3. Fré- 
déric Perraudeau. Mon désir, 85170 La Garnache 
{Vendée). 

• 

Vends CPC 464 mono, 1 lecteur 0D1, 1 joystick, 
1 utilitaire 3D, 2 livres, logiciels, jeux. Le tout 
3000 F. Tél. 47.63.46.43. 

Amstrad CPC 464 monoch. + 200 jeux + 30livres 
programmes exe. état, le tout avec 2 joysticks 
2000 F. Tél. (Il 43.75.64.40. 

S) 

Vends log. Tuer n'est pas jouer, 180 F + orgue 
Yamaha. Demander Christophe au 20.29.16.71. 

• 

Cherche lect. disq. Amstr. compatible CPC 464. 
Maerten Christophe 4/12 rue du Bastion Meunier, 
59800 Lille. 

• 

Vends C 52 + 8 modules, t.b.e. 1000 F. Tl 99/4a 
en panne + 5 modules. 800 F, les deux 1600 F. 
Tél. Marc, après 19 h au 94.94.00.1 1. 

• 

Vends CPC N° 7, 9. 12 è 17, le tout 150 F. port 
en sus. Amstrad Magazine n° 5 à 20 : 1 20 F, port 
en sus. Tél. 42.73.29.25 h.rep. 

• 

Affaire I Vends lect. Vortex 5 P s/garantie + 600 
jeux + disques + ROM. Tél. 48.93.11.93 soir. 
Prix : 2800 F. 

• 

CPC 6128 recherche correspondants K7 et dise, 
pour échange logiciels. Tél. 16.22.62.28 deman- 
der Cédric. 

• : 

Vends 6128 couleur + lecteur K7, + 4 livres init. 
L.M + 200 logiciels + revues, 520 F à débettre. 
Philippe. Tél. 46.81.33 .84. 

• 

Vends Amstrad 464 couleur + livres + magazines 
+ logiciels et autres. Le tout pour 2500 F. Tél. au 
46.65.89.68 Daniel. 

« 

Attention I Vends prog. permettent de créer vos 
fiches cinéma sur dise et de les imprimer I Disc 3" 
+ 100 fiches: 90 F. M'écrire pour plus de rensei- 
gnements. Régis Le Pipec. 1 rue Moulin Rothard. 
St Jean de Boiseau 44640 Le Pellerm 



Vends Mirage Imager + câble 61 28 :400 F ♦ ori- 
ginaux dise. Sold a million I, II. III et Computer Hits 
1 20 F pièce ou 450 F les 4. Tél. 87.67.40.47. 

S) 

Vends interface + horloge pour PCW marque 
S.C.A avec disquette logiciels + numéros CPC. 
écho du PCW. Tél. dom (1) 49.86.50.70. 

S) 

Vends interface 8 sorties 220 V - 300 W compati- 
ble Amstrad avec prog. d'animation lumineuse 
830 F. Tél. Gilles 43.81.45.65. 

CPC 6128 + DMP 2000 + treitement textes - 
Recherche contact. Drouet Jacques. 643 bd Gri- 
gnan BP 1203 - 83070 Toulon Cedex. 

• 

Vends impr. Okimate 20 + hard copy ♦ logiciel 
AMX Pagemaker, le tout 2000 F. Tél. après 18 h 
au 69.25.01.38. Demandez Stéphane. 

S) 

Achète CPC 6 1 28 ou 464 - Cherche log. éducatifs 
tous âges et log. éco soft et pour synthé vocal 
Technic. Tel après 20 h 23.70.26.01. 

• 

Vends Amstrad CPC 664 superbe, servi quelques 
heures, monochrome + nbx logiciels + megnéto. 
Prix 1900 F, Tél. vite au 94.06.02.13 Toulon. 



Cherche 
Merci. 



'doc" Amlettre. Tél. 44.82.24.49 Oise. 



Je développe pour vous vos programmes en DBASE 
2 ou 3 + sur CPC 61 28 ou PCW ou PC. Contactez - 
moi le soir. Tél. 35.91.07.42 

• 

Echange console CPC 464 + drive DDI + manuels 
contre CPC 6128 (mat. t.b.e. emb. orig.l. Tel 16 
(1) 48.32.89.62 demander Bernerd. le soir. 

• 

CPC 464 mono t.b.e. + nbx logiciels + livres, è 
vendre 1500 F. Tél. 64.21.39.88 le soir. Deman- 
der Roger, Chelles 77. 

• 

Cause double emploi vends DMP 1 peu servi, 
1000 F. Tél. 47.78.89.28 après 19 h. 

♦ 

Vends DMP 2000 garantie 1300 F + originaux, 
jeux 100 F au lieu de 300, 150 F Discology Tél. 
bur. (Il 39.02.92.95 - dom. 30.43.59.25. 

• 

Achète meilleur prix, revue CPC n° 1. Tél. 
31 95 69 007 



ANNONGEZ-VOUS ! 


Vous pouvez passer directement vos annonces sur le minitel. 

Elles seront validées dans la journée. 

Attention : dans un tel cas, elles ne seront pas dans la revue. 

Une annonce envoyée à la rédaction est mise sur le serveur dans les 48 heures. 
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Coupon à renvoyer accompagné de 4 timbres à 2,20 F à : 
SORACOM, La Haie de Pan - 35170 BRUZ 


-» 

w 


Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 
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AMSTRAD est une marque déposée. 
CPC est une revue mensuelle totalement indé- 
pendante d AMSTRAD GB et d'AMSTRAD 
FRANCE. 

Les noms, prénoms et adresses de nos abonnés sont com- 
muniqués i nos services internes du groupe, ainsi qu'aux 
organismes tés contractuetemenl pour le routage. Les in- 
formations peuvent taire robjeufun droit d'accès et de recti- 
kalion dans le cadre légal. 

Les articles et programmes que nous publions dans ce numéro 
binéHàul. pour une grande part, du droi tt auteur. De ce 
lit, Us ne peuvent ftre imrtés, contrefais, copiés par quelque 
procédé que ce soi, même partielemeni sans taulorisalion 
écrite de la Société SORACOU et de rauleur concerné. Les 
options exprimées n'engagent que la responsabtké de leurs 
auteurs. Les dfférerts montages présentés ne peuvent être 
tiafsês que dans unbul privé ou scient frquemaè non com- 
mercial Ces réserves s'appliquent également aux logiciels 
pubfés dans ■ revue. 



Cherche DD11 à prix intéressant. Petit, tél. 
83.47.37.99, après 18 h. 

• 

Vends pour Amstrad 464, 12 jeux, excellent étal. 
Sébastien au 66.25.71.18 après 18 h (900 F). 

• 

Vends Commodore + lecteur + K7, cours- 
BAS1C + manette + raccord TV, année 85, 
état neuf, prix 700 F. Tél. 21.59.71.84, après 
19 h, svp. 

• 

Vends 464 couleur + DD1 + joystick + jeux, 
3000 F, imprimante Fastext 80 : 1500 F. Tél. 
42.07.74.17, après 18 h. 

• 

Vends dises, K7 et livres à 50 °!o du prix. Cotte 
Christophe, Rés. du Parc, Les noisetiers, 38430 
Moirans. Tél. 76.35.44.08, apr. 19 h. 

• 

Vends Amstrad 6128 mono + lect. K7 
+ adaptateur péritel + 20 dk + jeux et util. 
+ revues et livres, 3300 F. Tél. 48.91.24.08. 

• ■ 

Vends imprimante couleur Okimate 20, état 
neuf, tête d'écriture neuve + câble de liaison , 
le tout 1800 F. Tél. 68.92.48.18, h. r. 

• 

Achète CPC Nos 12, 14, 15, bon étal, s.v.p. 
Pradalier, 8, square de la Libération. 93100 
Montreuil. 

• 

Vends CPC 6128 mono, imprimante DMP 
2000, manuels français, 30 revues et nbrx livres 
CPC, le tout 4000 F. Tél. 48.98.59.15. 

Vends 6128 couleur + jeux et util. 
+ imprimante DMP 2000 + autres périphéri- 
ques + livres et revues. 6700 F. Tél. 
87.01.52.96. 

• 

Vends Amstrad 464 coul. + DDI1 + joystick 
+ 20 dsk (jeux et utilitaires) + livres (bible 
+ prog. Z80) + etc. Raphaël, 78.68.34.63, 
3500 F. 

• 

Vends CPC 6128 mono + jeux + assembleur 
DAMS + livres + joystick, t. b. et. acheté 
début 87. 2700 F. Tél. 39.51.87.39. 

• 

Vends K7 avec 22 jeux dont Zox 2u^9, Ping- 
Pong, Arkanoid, Jail Break, Light Force, 
Bombjack. Tél.97.34.25.17. après I8h. Lionel. 

• ; 

Vends dise avec news. Ecrire à Serge 
PADELLEC - 6 rue Hellegouarch - 56850 
Caudan. 

• 

Vends CPC 464 couleur + 300 jeux environ : 
3 000 F. Tél. 16.1.48.64.17. 15. heures bureaux 
ou après 19h au 16.44.56.33.47. 

• 

Un journal est né pour CPC C ou D, 35 F pour 
n° 1. Poke SOS, PA, etc. BELLANTE 
Yannick - 491 rue La FreilleChedde - 74190 Le 
Fayel . 

S) 

Recherche lecteur 5**1/4 avec cordon, manuel 
d'utilisation, logiciels, utilitaire + jeux pour 
CPC 464. M. BOUCHER - BP5 - 45480 Baso- 
ches. Tél. 38. 39.41. 88. 

• 

Cherche contacts sérieux sur 6128 pour échan- 
ges. Vends K7 30 F pièce ou 120 F les 5. VIA- 
LIS VITROLLES - 48700 St Amans. 
Tél.66.47.37.84. 



PETITES 
ANNONCES 



Vendl jeux pour CPC, Airwoll' 2, Paperboy, 
Thundercats, etc. prix bas. Brilïaut Jean-Nod, 
Hameau de Liacani, 20137 porlo-Vecchio. 

é> 

Vends 664 c, t. b. él. + 20 disks + revues 
(+50) + livres + logiciels (+ 300), le tout 
4500 F à débattre. Tél. 82.84.14.84, après 18 h. 

• 

Vends 664 coul. + jeux (300) + CPC I à 28 
+ suite abonnement + livres + disk (20), val. 
8000 F, vendus, 4000 F. Tél. 82.84.14.84. après 

18 h. 

• 

Recherche programmeur pr traduire listing 
BASIC ZX81 en BASIC Amstrad 464. Rémun. 
ass. env. coord. à Lemonon, Montrabc 31 130. 

Vends CPC 464 monochrome + nbreux jeux 
+ 3 joysticks t revues astuces, 2800 F. Prix 
à débattre. Didier, 46.27.29.73, Paris. 

• 

Vends imprim. Centronics, qualité courrier, 
double interface, compatible Epson, 1300 F 
+ cadeaux. Tél. 1 42.59.52.15, Jean-Marc. 

• 

Cde vds d'origine, 350 F pièce DATAMAT 
+ TEXTOMAT, CALCULMAT, I". envoi 
inclus, D.P. B.P. 11. 67160 Wissembourg. 

• 

Achète ou échange logiciels de formatage pour 
disquettes, 5P1Q. Demandez Stéphane entre 

19 h et 20 h au 34.14.74.98. 

a 

Vends lecteur disk DDI, 1400 F + adaptateur, 
péritel, 250 F. Tél. 43.61.58.80. 

• 

Vends CPC 6128 coul., t. b. et. + 155 jeux 
+ multiplan + dBase II + Turbo Pascal etc. 
+ revues + magnéto + câble + livres, cède : 
5000 F. 60.80.37.68. 

• 

Faites durer vos rubans d'imprimante, écono- 
mie assurée grâce â mon truc. Envoyer 50 F à 
Daniel Maubeuge, 55170 Ancerville. 

• 

Agent Cial introduit sur France circuit reven- 
deur inf. l'am. et pro. en. carte sup. Tél. 



Rentabilisez votre 6128 (*) 
& PCW 8256/8512 

Programmes en accès Direct 

Gestion de fichiers, + de 900 fiches 
de 186 car. répartis en 10 rubriques 
rech. multicritères. Mailing, 120 F 

Gestion comptes bancaires + de 
3000 écritures, nb cpt illimité 180 F 

Gestion de bibliothèque + de 1500 
titres de livres ou revues 180 F 

Compilation des trois programmes 
pour CPC 6128 uniquement... 320 F 

Envoyez votre commande 
et règlement 

(Prix port compris) 
a 

M. Roger Desfournaux 

31, rue du Couvent 
84300 CAVAILLON 

Tél. 90.76.13.49 

Rens + catalogue contre 2 timbres 

(')avec licence Mallard. CPC N° 17 p. 60 
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LIVRES 

+ port 10% 



j Compilaiion rv 2 (CPC n 5 à 8) 
Compilation n' 1 épuisée 



80 F 
80 F 



j Programmes utilitaires sur AMSTRAD 110 F 
(Nollo édition) 



j Communiquez avec AMSTRAD 

D. BONOMO - E DUTERTRE 
'Nello édition) 



115F 

J Jouez avec AMSTRAD - KERLOCH 48 F 



j L'Univers du PCW - Patrick LEON 119F 

Cassette 
j Communiquez avec Amstrad 1 90 F 

Disquettes 
j L-Univers du PCW - Patrick LEON 1 50 F 

j Communiquez avec AMSTRAD 250 F 

A : TOTAL 

B: PORT 10% 

A + B TOTAL GENERAL 



ANCIENS NUMEROS 

Franco de port 



Attention, n° 1 à 9. 12. 14, 15, 17, 21 et HS 1. 7 épuisés 

□ 10, 11, 13, 16,18, 19,20, 22,23 

■: 25 ?6 ?7 ?P 29 30 31 32 T> ° '• 25 F 



REPORT TOTAL GENERAL A ♦ B 
HORS SERIE (sans cassette) 

□ n°2 13F 

j ■'••■.■ 15F 

Entourez le (ou les) numéro(s) commandé(s). 



DISQUETTES 

Franco de port 



1 disquette contient 2 rf consécutifs de CPC 

- Disquette n" 1 comprend CPC 1 et 2 

- Disquette n° 2 comprend CPC 3 et 4 

- Disquette rf 3 comprend CPC 5 et 6 

- Disquette n" 4 comprend CPC 7 et 8 

- Disquette rf 5 comprend CPC 9 et 10 

- Disquette n" 6 comprend CPC 11 et 12 

- Disquette n° 7 comprend CPC 13 et 14 

- Disquette rf 8 comprend CPC 15 et 16 

- Disquette rf 9 comprend CPC 17 et 18 

- Disquette n° 10 comprend CPC 19 et 20 

- Disquette rf 11 comprend CPC 21 et 22 

- Disquette rf 12 comprend CPC 23 et 24 

- Disquette rf 13 comprend CPC 25 et 26 

- Disquette rf 14 comprend CPC 27 et 28 

- Disquette rf 15 comprend CPC 29 et 30 

- Disquette rf 16 comprend CPC 31 et 32 

- Disquette n" 1 7 comprend CPC 33 et 34 



Les disquettes HORS-SERIE 
contiennent les programmes du numéro correspondant. 



□ abonné 110 F □ non abonné 140 F 

□ abonnement disquettes (6) 600 F 



Le* abonnement» disquettes ne sont pas rétroactifs. 
Total général franco Ponensus 10% pour »nvo(» par avton 



NOM 



Prénom : 



Adresse : 



Code postal : 
Date : 



Ville : 



Signature : 



Merci d'écrire en majuscules. Ci-joint un chèque libellé à l'ordre des Editions SORACOM. 

Retournez le(s) bulletin(s) ou une photocopie à : Editions SORACOM - La Haie de Pan -35170 BRUZ. 



9.X 



CPC n° 35 ■ Juin 1988 




[ 



A RETOURNER A: 
BRETAGNE EDIT 1 PRESSE 
La Haie De Pan - 35170 BRLZ 

Tél. 99.57.90.37 



I 

| Mode de règlement : 

| Chèque □ Mandat □ Chèque postal □ 

I 



PAC PUNK 

VS4 

SYNCHRONOUS 

DUEL 

MERLIN 

PETROL 



Nom. 



- Prénom . 



Adresse- 



I 

I Code postal- 

I 



Commande en date du :_ 
Signature 



-Ville- 



Logiciels disponibles uniquement sur disquettes ! 



I 

■ 













PRIX UNITAIRE 


MONTANT 


75,00 
75,00 
75,00 
75,00 
75,00 
75,00 




PORT 
FORFAIT 


Dclà3 

logiciels 


10 F 


Dc4k6 

logiciels 


13 F 


Total 




Envoi en recommandé 


7F 


Montant global 





% 



DISCOLOGY 



Version 5.1 




POUR VOUS SURPASSER 

3 Programmes en 1 
pour votre Amstrad CPC 



L'EDITEUR: 

Un Editeur universel de secteurs et de fichiers. Grâce à sa boîte à outils 
exceptionnelle, (Désassembleur, Calculatrice, Listeur Basic.) tout devient possible. 

LE COPIEUR: 

Un Copieur intégral pour la sauvegarde de vos disquettes et cassettes. 
Il vous étonnera par ses performances et sa simplicité d'utilisation. 

L'EXPLOREUR : 

Un graphique animé en "Temps Réel" qui vous révélera tous les secrets de vos 
disquettes. Un programme sans équivalent. 

LES 7 POINTS FORTS DE DISCOLOGY 

> La facilité : Grâce aux Fenêtres, aux Menus Déroulants et à l'Aide Intégrée. 

> La vitesse : 160 Ko de Langage Machine pur ! 

> La documentation : Un Manuel complet et une notice technique approfondie. 

> La compatibilité : Il gère toutes les extensions mémoire et les lecteurs 5 1/4 pouces. 

> La performance : Incroyable et absolue. 

> L'inédit : Du vraiment jamais vu ! 

y La référence : Des milliers d'utilisateurs enthousiastes en France comme 
à l'Etranger. DISCOLOGY est reconnu et acclamé par la presse internationale. 



Revendeurs, contactez-nous ! 

DISCOLOGY Version 5.1 est disponible immédiatement, sans frais de port, auprès de MERIDIEN Informatique 5 et 7, La canebière 13001 Marseille Tél. 



91.94.15.53 



H 



Version 5.1 pour Amstrad CPC 
Disponibilité immédiate. 



BON DE COMMANDE 

□ Je commande DISCOLOGY au prix de 350 F 

□ Je commande Master Save V 3.2 (Copieur seul) au prix de 1 90 F Je règle ma commande : 

D Je possède déjà Master Save et je commande DISCOLOGY. □ par chèque joint (port gratuit) 

Je joins ma disquette Master Save et je ne paye que 160 F □ contre-remboursement (+ 30 F de frais de port) 

Nom : Prénom : 



resse : 



Ad 

Code Postal : 



Ville : 



Tél.: 



A retourner à MERIDIEN Informatique - 5 et 7, La Canebière - 13001 MARSEILLE 



M 

Ë MERIDH 

JJlNFORMAJlC 



